Changeset 12551

Timestamp:

03/16/10 18:06:28 (14 years ago)

Author:

Mark Evenson

Message:

MAKE-PATHNAME does not have any merging directories semantics.

File:

• trunk/abcl/src/org/armedbear/lisp/Pathname.java (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/Pathname.java

@@ -1103 +1103 @@
                 host = defaults.host;
             }
-            directory = mergeDirectories(directory, defaults.directory);
+            if (directory == NIL && defaults != null) {
+                directory = defaults.directory;
+            }
             if (!deviceSupplied) {
                 device = defaults.device;