1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

Fix up previous change.

This commit is contained in:
Richard M. Stallman 1993-05-28 19:46:06 +00:00
parent 5a10f69338
commit 540dde41b7

View File

@ -33,10 +33,10 @@
(defvar Info-default-directory-list
(let ((start (list "/usr/local/info/"
"/usr/local/lib/info/"
configure-info-directory)))
(or (member configure-info-directory start)
(setq start (nconc start (list configure-info-directory))))
"/usr/local/lib/info/"))
(configdir (file-name-as-directory configure-info-directory)))
(or (member configdir start)
(setq start (nconc start (list configdir))))
(or (member (expand-file-name "../info/" data-directory) start)
(setq start
(nconc start