tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

HTML export: correct a bug in coderef link. 

* org-html.el (org-html-make-link): correct a bug in coderef link.
This commit is contained in:
Manuel Giraud 2011-04-12 18:18:50 +00:00 committed by Carsten Dominik
parent 4262dc1cbc
commit c56bf33812
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-html.el
View File

@ -826,7 +826,8 @@ MAY-INLINE-P allows inlining it as an image."
(not type)
(string= type "http")
(string= type "https")
(string= type "file"))
(string= type "file")
(string= type "coderef"))
(if fragment
(setq thefile (concat thefile "#" fragment))))
@ -836,7 +837,8 @@ MAY-INLINE-P allows inlining it as an image."
(setq thefile
(let
((str (org-export-html-format-href thefile)))
(if (and type (not (string= "file" type)))
(if (and type (not (or (string= "file" type)
(string= "coderef" type))))
(concat type ":" str)
str)))