r10953: Automated commit for Debian build of uffi upstream-version-1.5.13

[uffi.git] / src / libraries.lisp

diff --git a/src/libraries.lisp b/src/libraries.lisp
index faa5f12c2ef44efab56d6f4f4a7bcd5bb3507352..349df7eb5d9371628e7db388ae3e5837b26081ba 100644 (file)
--- a/src/libraries.lisp
+++ b/src/libraries.lisp
@@ -45,9 +45,6 @@ library type if type is not specified."
   (unless (listp directories)
     (setq directories (list directories)))
   #+(or win32 mswindows)
-  (unless drive-letters
-    (setq drive-letters (list (pathname-device directories))))
-  #+(or win32 mswindows)
   (unless (listp drive-letters)
     (setq drive-letters (list drive-letters)))
   #-(or win32 mswindows)