mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 08:32:53 +00:00
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 a new issue