* 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.
This commit is contained in:
Jonathan Leech-Pepin 2012-12-13 08:38:31 -05:00
parent 31d24aa213
commit 5c1eab535b
1 changed files with 6 additions and 0 deletions

View File

@ -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)