Author: mhenoch Date: Thu Nov 22 08:52:39 2007 New Revision: 147 Modified: cl-darcs/trunk/diff.lisp Log: Use TRUENAME on repository directory when diffing Modified: cl-darcs/trunk/diff.lisp ============================================================================== --- cl-darcs/trunk/diff.lisp (original) +++ cl-darcs/trunk/diff.lisp Thu Nov 22 08:52:39 2007 @@ -119,7 +119,7 @@ "Find changes in REPO from pristine tree. Return a list of patches. ORIGINAL and MODIFIED specify directories to start from." - (setf repo (fad:pathname-as-directory repo)) + (setf repo (truename (fad:pathname-as-directory repo))) (unless (and original modified) (setf modified repo) (setf original (upath-subdir repo '("_darcs" "pristine"))))