[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