org-find-exact-heading-in-directory: Use full path

* lisp/org.el (org-find-exact-heading-in-directory): Use full path for
files.

When the path is not included, `org-find-exact-heading-in-directory'
will fail when the current value of `default-directory' is different
from the argument DIR.

TINYCHANGE
This commit is contained in:
Kyle Meyer 2014-04-29 15:00:37 -04:00 committed by Bastien Guerry
parent 5bece6f014
commit d3f210676c
1 changed files with 1 additions and 1 deletions

View File

@ -16136,7 +16136,7 @@ a priority cookie and tags in the standard locations."
"Find Org node headline HEADING in all .org files in directory DIR.
When the target headline is found, return a marker to this location."
(let ((files (directory-files (or dir default-directory)
nil "\\`[^.#].*\\.org\\'"))
t "\\`[^.#].*\\.org\\'"))
file visiting m buffer)
(catch 'found
(while (setq file (pop files))