diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2012-04-25 22:07:37 +0200 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2012-04-26 14:49:29 +0200 |
commit | c3d7d21108506637480977d8cbeceafb6f96991b (patch) | |
tree | f13a10d5325a8cfab0b4960519daa9baa44e2700 | |
parent | 206ce6e0b52269eff533673b4a5055f9d6bbe27d (diff) | |
download | org-mode-c3d7d21108506637480977d8cbeceafb6f96991b.tar.gz |
org-e-latex: Fix coderef display for links with no contents
* contrib/lisp/org-e-latex.el (org-e-latex-link): Fix coderef display
for links with no contents.
* contrib/lisp/org-e-odt.el (org-e-odt-link): Remove useless test.
* contrib/lisp/org-e-html.el (org-e-html-link): Remove useless test.
-rw-r--r-- | contrib/lisp/org-e-html.el | 2 | ||||
-rw-r--r-- | contrib/lisp/org-e-latex.el | 2 | ||||
-rw-r--r-- | contrib/lisp/org-e-odt.el | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/contrib/lisp/org-e-html.el b/contrib/lisp/org-e-html.el index df6cfc1..1f20865 100644 --- a/contrib/lisp/org-e-html.el +++ b/contrib/lisp/org-e-html.el @@ -2485,7 +2485,7 @@ INFO is a plist holding contextual information. See " onmouseover=\"CodeHighlightOn(this, '%s');\"" " onmouseout=\"CodeHighlightOff(this, '%s');\"") fragment fragment) - (format (org-export-get-coderef-format path (or desc "%s")) + (format (org-export-get-coderef-format path desc) (org-export-resolve-coderef path info))))) ;; Link type is handled by a special function. ((functionp (setq protocol (nth 2 (assoc type org-link-protocols)))) diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el index d19f017..4483233 100644 --- a/contrib/lisp/org-e-latex.el +++ b/contrib/lisp/org-e-latex.el @@ -1512,7 +1512,7 @@ INFO is a plist holding contextual information. See ;; Coderef: replace link with the reference name or the ;; equivalent line number. ((string= type "coderef") - (format (org-export-get-coderef-format path (or desc "")) + (format (org-export-get-coderef-format path desc) (org-export-resolve-coderef path info))) ;; Link type is handled by a special function. ((functionp (setq protocol (nth 2 (assoc type org-link-protocols)))) diff --git a/contrib/lisp/org-e-odt.el b/contrib/lisp/org-e-odt.el index 98f72ff..347c079 100644 --- a/contrib/lisp/org-e-odt.el +++ b/contrib/lisp/org-e-odt.el @@ -3637,7 +3637,7 @@ INFO is a plist holding contextual information. See ;; Coderef: replace link with the reference name or the ;; equivalent line number. ((string= type "coderef") - (let* ((fmt (org-export-get-coderef-format path (or desc "%s"))) + (let* ((fmt (org-export-get-coderef-format path desc)) (res (org-export-resolve-coderef path info)) (org-e-odt-suppress-xref nil) (href (org-xml-format-href (concat "#coderef-" path)))) |