Mercurial > emacs

changeset 3214:7fb1204b22de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix up previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 28 May 1993 19:46:06 +0000
parents 1fdd5c6dc6ba
children 8463158ec42e
files lisp/paths.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/paths.el	Fri May 28 19:19:05 1993 +0000
+++ b/lisp/paths.el	Fri May 28 19:46:06 1993 +0000
@@ -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