From 540dde41b783dc4c15a74170cfd2bc8b1176620a Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 28 May 1993 19:46:06 +0000 Subject: Fix up previous change. --- lisp/paths.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lisp/paths.el') diff --git a/lisp/paths.el b/lisp/paths.el index 6f4975f3394..46ebbc6c6e1 100644 --- a/lisp/paths.el +++ b/lisp/paths.el @@ -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 -- cgit v1.2.1