1.0.1.22:

        Handle PATHNAME-DEVICE in ASDF-INSTALL:DIRECTORIFY (thanks to
        Yaroslav Kavenchuk).

diff --git a/contrib/asdf-install/installer.lisp b/contrib/asdf-install/installer.lisp
index 4dd97a5..39dc46c 100644 (file)
--- a/contrib/asdf-install/installer.lisp
+++ b/contrib/asdf-install/installer.lisp
@@ -13,7 +13,8 @@
         (merge-pathnames
          (make-pathname :directory `(:relative ,(pathname-name path)))
          (make-pathname :directory (pathname-directory path)
-                        :host (pathname-host path)))
+                        :host (pathname-host path)
+                        :device (pathname-device path)))
         path)))
 
 (defvar *sbcl-home* (directorify (posix-getenv "SBCL_HOME")))

diff --git a/version.lisp-expr b/version.lisp-expr
index 7721cb3..82304ff 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.1.21"
+"1.0.1.22"