24 Aug
2007
24 Aug
'07
12:11 p.m.
Author: mhenoch Date: Fri Aug 24 08:11:44 2007 New Revision: 125 Modified: cl-darcs/trunk/pending.lisp Log: Don't convert pathname to string when creating patch objects Modified: cl-darcs/trunk/pending.lisp ============================================================================== --- cl-darcs/trunk/pending.lisp (original) +++ cl-darcs/trunk/pending.lisp Fri Aug 24 08:11:44 2007 @@ -68,5 +68,5 @@ (add-to-pending repo (if (eql type :file) - (make-instance 'add-file-patch :filename (pathname-to-string file)) - (make-instance 'add-dir-patch :directory (pathname-to-string file)))))) + (make-instance 'add-file-patch :filename file) + (make-instance 'add-dir-patch :directory file)))))