branch: externals/org
commit 4d3b216b836d1ad116dcf036cd3e0db35d6f52e5
Merge: 08c047a507 6cb088972f
Author: Ihor Radchenko <[email protected]>
Commit: Ihor Radchenko <[email protected]>
Merge branch 'bugfix'
---
lisp/ol.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/ol.el b/lisp/ol.el
index d8a9b92ad1..f6d6569821 100644
--- a/lisp/ol.el
+++ b/lisp/ol.el
@@ -1521,8 +1521,9 @@ This function is meant to be used as a possible tool for
(match-string 1 path)))
(file-name (if (not option) path
(substring path 0 (match-beginning 0)))))
- (if (string-match "[*?{]" (file-name-nondirectory file-name))
- (dired file-name)
+ (if (and (string-match "[*?{]" (file-name-nondirectory file-name))
+ (not (file-exists-p file-name)))
+ (dired file-name)
(apply #'org-open-file
file-name
in-emacs
