Mercurial > emacs
comparison lisp/paths.el @ 24133:6ecfb6510c3b
(Info-default-directory-list): Perhaps add /usr/info.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 20 Jan 1999 03:24:48 +0000 |
parents | d001394d1a2e |
children | 461616523a16 |
comparison
equal
deleted
inserted
replaced
24132:598274a2398f | 24133:6ecfb6510c3b |
---|---|
31 ;; in site-init.el. Do not change this file. | 31 ;; in site-init.el. Do not change this file. |
32 | 32 |
33 ;;; Code: | 33 ;;; Code: |
34 | 34 |
35 (defvar Info-default-directory-list | 35 (defvar Info-default-directory-list |
36 (let ((start (list "/usr/local/lib/info/" | 36 (let* ((start (list "/usr/local/lib/info/" |
37 ;; This comes second so that, if it is the same | 37 ;; This comes second so that, if it is the same |
38 ;; as configure-info-directory (which is usually true) | 38 ;; as configure-info-directory (which is usually true) |
39 ;; and Emacs has been installed (also usually true) | 39 ;; and Emacs has been installed (also usually true) |
40 ;; then the list will end with two copies of this; | 40 ;; then the list will end with two copies of this; |
41 ;; which means that the last dir file Info-insert-dir | 41 ;; which means that the last dir file Info-insert-dir |
42 ;; finds will be the one in this directory. | 42 ;; finds will be the one in this directory. |
43 "/usr/local/info/")) | 43 "/usr/local/info/")) |
44 (configdir (file-name-as-directory configure-info-directory))) | 44 ;; Typically on a GNU system, installed info files are found |
45 (setq start (nconc start (list configdir))) | 45 ;; in /usr/info, but the default prefix is /usr/local. |
46 (usrdir "/usr/info") | |
47 (sysdir (and (file-directory-p usrdir) | |
48 (not (string= configure-info-directory usrdir)) | |
49 (list usrdir))) | |
50 (configdir (file-name-as-directory configure-info-directory))) | |
51 (setq start (nconc sysdir start (list configdir))) | |
46 start) | 52 start) |
47 "Default list of directories to search for Info documentation files. | 53 "Default list of directories to search for Info documentation files. |
48 They are searched in the order they are given in the list. | 54 They are searched in the order they are given in the list. |
49 Therefore, the directory of Info files that come with Emacs | 55 Therefore, the directory of Info files that come with Emacs |
50 normally should come last (so that local files override standard ones). | 56 normally should come last (so that local files override standard ones). |