瀏覽代碼

* contrib/lisp/org-e-texinfo.el: Provided export of info: links

(org-e-texinfo-link): Parse info: links to allow linking to
appropriate info nodes.
Jonathan Leech-Pepin 12 年之前
父節點
當前提交
5c1eab535b
共有 1 個文件被更改,包括 6 次插入0 次删除
  1. 6 0
      contrib/lisp/org-e-texinfo.el

+ 6 - 0
contrib/lisp/org-e-texinfo.el

@@ -1208,6 +1208,12 @@ INFO is a plist holding contextual information.  See
 	   (let ((path (org-export-solidify-link-text path)))
 	     (if (not desc) (format "@ref{%s}" path)
 	       (format "@ref{%s,,%s}" path desc)))))))
+     ((member type '("info"))
+      (let* ((info-path (split-string path ":"))
+	     (info-manual (car info-path))
+	     (info-node (or (cadr info-path) "top"))
+	     (title (or desc "")))
+	(format "@ref{%s,%s,,%s,}" info-node title info-manual)))
      ((member type '("fuzzy"))
       (let ((destination (org-export-resolve-fuzzy-link link info)))
 	(case (org-element-type destination)