Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Tweak previous info.el change

Browse source
This commit is contained in:
Glenn Morris 2014-01-09 23:26:04 -08:00
parent 06827ec842
commit 94ffb4b20e
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/info.el
View file

@ -737,8 +737,9 @@ in `Info-file-supports-index-cookies-list'."
(and path
installation-directory
(let ((dir (expand-file-name "info/" installation-directory)))
(setq Info-directory-list (delete dir Info-directory-list))
(push dir Info-directory-list)))
(when (file-directory-p dir)
(setq Info-directory-list (delete dir Info-directory-list))
(push dir Info-directory-list))))
;; For a self-contained (ie relocatable) NS build, AFAICS we
;; always want the included info directory to be at the head of
;; the search path, unless it's already in INFOPATH somewhere.