diff options
| author | Richard M. Stallman | 1993-05-28 19:46:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-28 19:46:06 +0000 |
| commit | 540dde41b783dc4c15a74170cfd2bc8b1176620a (patch) | |
| tree | 219692dafaff6d53970e25fc2ed4648f5e838869 | |
| parent | 5a10f69338e0a2a59306dd3899feea475607bbb6 (diff) | |
| download | emacs-540dde41b783dc4c15a74170cfd2bc8b1176620a.tar.gz emacs-540dde41b783dc4c15a74170cfd2bc8b1176620a.zip | |
Fix up previous change.
| -rw-r--r-- | lisp/paths.el | 8 |
1 files changed, 4 insertions, 4 deletions
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 @@ | |||
| 33 | 33 | ||
| 34 | (defvar Info-default-directory-list | 34 | (defvar Info-default-directory-list |
| 35 | (let ((start (list "/usr/local/info/" | 35 | (let ((start (list "/usr/local/info/" |
| 36 | "/usr/local/lib/info/" | 36 | "/usr/local/lib/info/")) |
| 37 | configure-info-directory))) | 37 | (configdir (file-name-as-directory configure-info-directory))) |
| 38 | (or (member configure-info-directory start) | 38 | (or (member configdir start) |
| 39 | (setq start (nconc start (list configure-info-directory)))) | 39 | (setq start (nconc start (list configdir)))) |
| 40 | (or (member (expand-file-name "../info/" data-directory) start) | 40 | (or (member (expand-file-name "../info/" data-directory) start) |
| 41 | (setq start | 41 | (setq start |
| 42 | (nconc start | 42 | (nconc start |