chiark / gitweb /
dot/lisp-init.lisp: Don't override `HOME:' in CMUCL after all.
authorMark Wooding <mdw@distorted.org.uk>
Mon, 28 Dec 2015 14:26:29 +0000 (14:26 +0000)
committerMark Wooding <mdw@distorted.org.uk>
Mon, 28 Dec 2015 14:26:29 +0000 (14:26 +0000)
It's too painful.

dot/lisp-init.lisp

index 146b25037cf4aa8fabbad230d6d1eab4c6c2874d..7f6e31600992e00f0bf924affb37a6348a56fee0 100644 (file)
@@ -25,8 +25,7 @@ (setf *compile-verbose* nil)
 (sb-ext:set-sbcl-source-location #p"/usr/share/sbcl-source/")
 
 ;; Tell some Lisps about my home directory.
 (sb-ext:set-sbcl-source-location #p"/usr/share/sbcl-source/")
 
 ;; Tell some Lisps about my home directory.
-#+cmu (ext:clear-search-list "HOME")
-#+(and unix (or sbcl clisp cmu))
+#+(and unix (or sbcl clisp))
 (let* ((#1=#:homestring (or #+sbcl (sb-ext:posix-getenv "HOME")
                            #+clisp (ext:getenv "HOME")
                            #+cmu (unix:unix-getenv "HOME")
 (let* ((#1=#:homestring (or #+sbcl (sb-ext:posix-getenv "HOME")
                            #+clisp (ext:getenv "HOME")
                            #+cmu (unix:unix-getenv "HOME")