Update asdf-utils to follow cormanlisp fix in asdf 2.24.3.
authorFrancois-Rene Rideau <fare@tunes.org>
Wed, 12 Sep 2012 13:23:22 +0000 (09:23 -0400)
committerFrancois-Rene Rideau <fare@tunes.org>
Wed, 12 Sep 2012 13:23:22 +0000 (09:23 -0400)
utils.lisp

index 47e1db9..cf7022d 100644 (file)
@@ -559,8 +559,9 @@ with given pathname and if it exists return its truename."
 (defun* user-homedir ()
   (truenamize
    (pathname-directory-pathname
+    #+cormanlisp (ensure-directory-pathname (user-homedir-pathname))
     #+mcl (current-user-homedir-pathname)
-    #-mcl (user-homedir-pathname))))
+    #-(or cormanlisp mcl) (user-homedir-pathname))))
 
 (defun* ensure-pathname* (x want-absolute want-directory fmt &rest args)
   (when (plusp (length x))