From c56bf33812a0c7ee5ddfa8c73e598348c3bbf47a Mon Sep 17 00:00:00 2001 From: Manuel Giraud Date: Tue, 12 Apr 2011 18:18:50 +0000 Subject: [PATCH] HTML export: correct a bug in coderef link. * org-html.el (org-html-make-link): correct a bug in coderef link. --- lisp/org-html.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/org-html.el b/lisp/org-html.el index 58fbc05d4..5d5347880 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))) -- 2.11.4.GIT