]> code.delx.au - gnu-emacs/commitdiff
Fix up previous change.
authorRichard M. Stallman <rms@gnu.org>
Fri, 28 May 1993 19:46:06 +0000 (19:46 +0000)
committerRichard M. Stallman <rms@gnu.org>
Fri, 28 May 1993 19:46:06 +0000 (19:46 +0000)
lisp/paths.el

index 6f4975f3394ca84a7d1b706b0245c652a416419c..46ebbc6c6e1f9b24929449eeeeb070c22434cef5 100644 (file)
 
 (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