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

org-element: Fix parsing path starting with ~ 

* lisp/org-element.el (org-element-link-parser): Do not prepend "//"
  to paths starting with "~".

Since b1dcd0fb0b, link parser doesn't
expand file names anymore. We need to prevent it from "fixing" paths
starting with "~", as it can cause trouble to some
exporters (e.g. latex).
This commit is contained in:
Nicolas Goaziou 2014-06-27 17:28:56 +02:00
parent 16c71d6b78
commit 2ae77c5e50
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-element.el
View File

@ -3053,8 +3053,8 @@ Assume point is at the beginning of the link."
(setq search-option (match-string 1 path) (setq search-option (match-string 1 path)
path (replace-match "" nil nil path))) path (replace-match "" nil nil path)))
;; Normalize URI. ;; Normalize URI.
(when (and (not (org-string-match-p "\\`//" path)) (when (and (file-name-absolute-p path)
(file-name-absolute-p path)) (not (org-string-match-p "\\`[/~]/" path)))
(setq path (concat "//" path))) (setq path (concat "//" path)))
;; Make sure TYPE always reports "file". ;; Make sure TYPE always reports "file".
(setq type "file")) (setq type "file"))