Email Archive: sbcl-commits (read-only)
|
[Sbcl-commits] CVS: sbcl/src/code target-pathname.lisp,1.40,1.41
From: Kevin Rosenberg <kevinrosenberg@us...> - 2004-01-28 22:03
|
Update of /cvsroot/sbcl/sbcl/src/code
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9260/src/code
Modified Files:
target-pathname.lisp
Log Message:
0.8.7.27:
src/code/target-pathname.lisp: Patch from Christophe Rhodes for unparsing
logical pathnames
Index: target-pathname.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/code/target-pathname.lisp,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -d -r1.40 -r1.41
--- target-pathname.lisp 27 Jan 2004 14:24:06 -0000 1.40
+++ target-pathname.lisp 28 Jan 2004 22:02:05 -0000 1.41
@@ -1399,6 +1399,7 @@
(defun unparse-logical-piece (thing)
(etypecase thing
+ ((member :wild) "*")
(simple-string thing)
(pattern
(collect ((strings))
|
Thread View
| Thread | Author | Date |
|---|---|---|
| [Sbcl-commits] CVS: sbcl/src/code target-pathname.lisp,1.40,1.41 | Kevin Rosenberg <kevinrosenberg@us...> |