From: Mark Wooding Date: Sun, 30 Aug 2015 09:58:38 +0000 (+0100) Subject: dot/lisp-init.lisp: The logical-pathname translations don't work in Clisp. X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/d38ebd87d4feb3fc692dd3573f9d432b2cdd2126 dot/lisp-init.lisp: The logical-pathname translations don't work in Clisp. --- diff --git a/dot/lisp-init.lisp b/dot/lisp-init.lisp index f037d1f..e060815 100644 --- a/dot/lisp-init.lisp +++ b/dot/lisp-init.lisp @@ -30,7 +30,7 @@ (let ((#1=#:sbcl-src #p"/usr/share/sbcl-source/")) ("SYS:CONTRIB;**;*.*.*" ,(#2# "contrib/**/*.*")))))) #+sbcl (require :sb-posix) -#+(and unix (or sbcl clisp cmu)) +#+(and unix (or sbcl cmu)) (let ((#1=#:home (pathname (concatenate 'string (or #+sbcl (sb-posix:getenv "HOME") #+clisp (ext:getenv "HOME")