Mercurial > emacs

diff lisp/startup.el @ 650:39f0e62a8511

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Tue, 19 May 1992 05:22:52 +0000
parents 70b112526394
children 7cbd4fcd8b0f
line wrap: on
line diff
--- a/lisp/startup.el	Tue May 19 02:05:47 1992 +0000
+++ b/lisp/startup.el	Tue May 19 05:22:52 1992 +0000
@@ -118,7 +118,7 @@
     (if (not (eq system-type 'vax-vms))
 	(mapcar (function
 		 (lambda (var)
-		   (let ((value (getev var)))
+		   (let ((value (getenv var)))
 		     (if (and value
 			      (< (length value) (length default-directory))
 			      (equal (file-attributes default-directory)