[armedbear-cvs] r12555 - branches/0.19.x/abcl/src/org/armedbear/lisp

Mark Evenson mevenson at common-lisp.net
Wed Mar 17 13:25:03 UTC 2010


Author: mevenson
Date: Wed Mar 17 09:24:59 2010
New Revision: 12555

Log:
Backport r12549: Allow Pathname TYPE to be :UNSPECIFIC.


Modified:
   branches/0.19.x/abcl/src/org/armedbear/lisp/Pathname.java

Modified: branches/0.19.x/abcl/src/org/armedbear/lisp/Pathname.java
==============================================================================
--- branches/0.19.x/abcl/src/org/armedbear/lisp/Pathname.java	(original)
+++ branches/0.19.x/abcl/src/org/armedbear/lisp/Pathname.java	Wed Mar 17 09:24:59 2010
@@ -543,7 +543,7 @@
         } else if (name == Keyword.WILD) {
             sb.append('*');
         }
-        if (type != NIL) {
+        if (type != NIL && type != Keyword.UNSPECIFIC) {
             sb.append('.');
             if (type instanceof AbstractString) {
                 String t = type.getStringValue();




More information about the armedbear-cvs mailing list