~ruther/guix-local

228a3982df157847554abc9d0831d687264d8ebd — Ludovic Courtès 9 years ago 1398a43 
git-download: Remove call to 'canonicalize-path'.

* guix/git-download.scm (git-predicate): Remove call to
'canonicalize-path' since this could lead to discrepancies.  For
instance it broke 'make update-guix-package' since it passes a
non-canonical directory name.
patch browse .tar.gz .zip 
1 files changed, 6 insertions(+), 1 deletions(-)

M guix/git-download.scm

M guix/git-download.scm => guix/git-download.scm +6 -1
@@ 191,7 191,12 @@ absolute file name and STAT is the result of 'lstat'."
                                                result)))
                               vlist-null
                               files))
         (prefix-length  (+ 1 (string-length (canonicalize-path directory))))

         ;; Note: For this to work we must *not* call 'canonicalize-path' on
         ;; DIRECTORY or we would get discrepancies of the returned lambda is
         ;; called with a non-canonical file name.
         (prefix-length  (+ 1 (string-length directory)))

         (status         (close-pipe pipe)))
    (and (zero? status)
         (lambda (file stat)