X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/blobdiff_plain/0712ae953c9acc1280d4d73cb8d119b230a68c95..c36efcdc0b2d92b02fd7224d4fc53cf5a7cb74e3:/dot/lisp-init.lisp?ds=inline diff --git a/dot/lisp-init.lisp b/dot/lisp-init.lisp index 2d8bb9e..54df25f 100644 --- a/dot/lisp-init.lisp +++ b/dot/lisp-init.lisp @@ -44,9 +44,9 @@ (sb-ext:set-sbcl-source-location #p"/usr/share/sbcl-source/") ;; Tell some Lisps about my home directory. CMU CL already has a search list ;; which does the same job. -#+(and unix (or sbcl clisp)) +#+(and unix (or sbcl clisp ecl)) (let* ((homestring (or #+sbcl (sb-ext:posix-getenv "HOME") - #+clisp (ext:getenv "HOME") + #+(or clisp ecl) (ext:getenv "HOME") "/home/mdw")) (home (pathname (concatenate 'string homestring "/")))) (setf (logical-pathname-translations "HOME")