ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-e-html.el: Properly render relative file URLs

This commit is contained in:
Jambunathan K 2012-06-02 17:07:56 +05:30
parent 2d71a58ef3
commit d728c17004
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/lisp/org-e-html.el
View File

@ -2501,9 +2501,8 @@ INFO is a plist holding contextual information. See
((string= type "file") ((string= type "file")
(when (string-match "\\(.+\\)::.+" raw-path) (when (string-match "\\(.+\\)::.+" raw-path)
(setq raw-path (match-string 1 raw-path))) (setq raw-path (match-string 1 raw-path)))
(if (file-name-absolute-p raw-path) (if (not (file-name-absolute-p raw-path)) raw-path
(concat "file://" (expand-file-name raw-path)) (concat "file://" (expand-file-name raw-path))))
(concat "file://" raw-path)))
(t raw-path))) (t raw-path)))
protocol) protocol)
(cond (cond