Commit 42b31bf9 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Info-directory-list): Don't use the invocation directory

unless it was used for exec-directory too.
parent edb85f59
......@@ -63,7 +63,11 @@ in paths.el.")
(length path)))))
(nreverse list))
(if (or (member sibling Info-default-directory-list)
(not (file-exists-p sibling)))
(not (file-exists-p sibling))
;; Use invocation-directory for Info only if we used it for
;; exec-directory also.
(not (string= exec-directory
(expand-file-name "../lib-src/" (invocation-directory)))))
(reverse (cons sibling (cdr (reverse Info-default-directory-list)))))))
"List of directories to search for Info documentation files.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment