From 266c56a3de4186c495e20fdba2c4aa2473d029c4 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Wed, 16 Sep 2015 11:51:27 +0100 Subject: [PATCH] dot/lisp-init.lisp: Use `sb-ext:posix-getenv' instead of `sb-posix:getenv'. The former is built into the standard image, while the latter involves loading a system at runtime which delays startup noticeably. --- dot/lisp-init.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/dot/lisp-init.lisp b/dot/lisp-init.lisp index 9defa8c..ed6acd1 100644 --- a/dot/lisp-init.lisp +++ b/dot/lisp-init.lisp @@ -30,10 +30,9 @@ ("SYS:CONTRIB;**;*.*.*" ,(#2# "contrib/**/*.*")))))) ;; Tell some Lisps about my home directory. -#+sbcl (require :sb-posix) #+cmu (ext:clear-search-list "HOME") #+(and unix (or sbcl clisp cmu)) -(let* ((#1=#:homestring (or #+sbcl (sb-posix:getenv "HOME") +(let* ((#1=#:homestring (or #+sbcl (sb-ext:posix-getenv "HOME") #+clisp (ext:getenv "HOME") #+cmu (unix:unix-getenv "HOME") "/home/mdw")) -- 2.11.0