ox-texinfo: Fix "cross reference to non-existent node" error

* lisp/ox-texinfo.el (org-texinfo-link): Do not transform path part of
  internal links.
This commit is contained in:
Nicolas Goaziou 2013-02-09 19:26:58 +01:00
parent c44f8c0af0
commit 16118a2af8
1 changed files with 4 additions and 8 deletions

View File

@ -1173,10 +1173,8 @@ INFO is a plist holding contextual information. See
;; LINK points to an headline. Use the headline as the NODE target
(headline
(format "@ref{%s,%s}"
(org-export-data
(or
(org-element-property :texinfo-menu-title destination)
(org-element-property :title destination)) info)
(or (org-element-property :texinfo-menu-title destination)
(org-element-property :title destination))
(or desc "")))
(otherwise
(let ((path (org-export-solidify-link-text path)))
@ -1198,10 +1196,8 @@ INFO is a plist holding contextual information. See
;; LINK points to an headline. Use the headline as the NODE target
(headline
(format "@ref{%s,%s}"
(org-export-data
(or
(org-element-property :texinfo-menu-title destination)
(org-element-property :title destination)) info)
(or (org-element-property :texinfo-menu-title destination)
(org-element-property :title destination))
(or desc "")))
(otherwise
(let ((path (org-export-solidify-link-text path)))