forked from mirrors/org-mode
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:
parent
4262dc1cbc
commit
c56bf33812
|
@ -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)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue