diff options
| author | Stefan Monnier | 2004-03-19 02:37:11 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2004-03-19 02:37:11 +0000 |
| commit | a025fccf6052c06a0ba0269e8dbd3c58392b02af (patch) | |
| tree | 09c52f94d063e508f5a3db01792cb0138e813e5d | |
| parent | e93b2f39b26a656fc6defeb37688e56bc0c79856 (diff) | |
| download | emacs-a025fccf6052c06a0ba0269e8dbd3c58392b02af.tar.gz emacs-a025fccf6052c06a0ba0269e8dbd3c58392b02af.zip | |
(Info-default-dirs): Don't ignore last part of I-d-d-l.
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el index 3438320beb4..773888efa6b 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -387,7 +387,9 @@ Do the right thing if the file has been compressed or zipped." | |||
| 387 | ;; version, so we should look there first. `Info-insert-dir' | 387 | ;; version, so we should look there first. `Info-insert-dir' |
| 388 | ;; currently expects to find `alternative' first on the list. | 388 | ;; currently expects to find `alternative' first on the list. |
| 389 | (cons alternative | 389 | (cons alternative |
| 390 | (reverse (cdr (reverse Info-default-directory-list))))))) | 390 | ;; Don't drop the last part, it might contain non-Emacs stuff. |
| 391 | ;; (reverse (cdr (reverse | ||
| 392 | Info-default-directory-list)))) ;; ))) | ||
| 391 | 393 | ||
| 392 | (defun info-initialize () | 394 | (defun info-initialize () |
| 393 | "Initialize `Info-directory-list', if that hasn't been done yet." | 395 | "Initialize `Info-directory-list', if that hasn't been done yet." |