Browse Source

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

Jambunathan K 13 years ago
parent
commit
d728c17004
1 changed files with 2 additions and 3 deletions
  1. 2 3
      contrib/lisp/org-e-html.el

+ 2 - 3
contrib/lisp/org-e-html.el

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