--- lisp/org-html.el | 6 ++++-- 1 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/org-html.el b/lisp/org-html.el index 58fbc05..5d53478 100644 --- a/lisp/org-html.el +++ b/lisp/org-html.el @@ -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))) -- 1.7.3.5