summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-06-17 19:12:53 +0000
committerRichard M. Stallman <rms@gnu.org>1995-06-17 19:12:53 +0000
commit01a2b480182e265c825e8e5defc338837389cbc8 (patch)
tree6bb39a296652eeb9b793082295567e48af6f3643 /lisp
parenteff87c2c1ddadddd7b177d91a59be6a218b8bf37 (diff)
downloademacs-01a2b480182e265c825e8e5defc338837389cbc8.tar.gz
(Info-directory-list): If path-separator isn't available, bind it here.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/info.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el
index b382a380490..46c53a86ed8 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -55,6 +55,10 @@ in paths.el.")
(defvar Info-directory-list
(let ((path (getenv "INFOPATH"))
+ ;; This is for older Emacs versions
+ ;; which might get this info.el from the Texinfo distribution.
+ (path-separator (if (boundp 'path-separator) path-separator
+ (if (eq system-type 'ms-dos) ";" ":")))
(sibling (if installation-directory
(expand-file-name "info/" installation-directory))))
(if path