diff --git a/guix/git-download.scm b/guix/git-download.scm index 6cf267d6c8..f904d11c25 100644 --- a/guix/git-download.scm +++ b/guix/git-download.scm @@ -185,9 +185,7 @@ (define (git-file-list directory) (directory (string-append (canonicalize-path directory) "/")) (dot-git (repository-discover directory)) (repository (repository-open dot-git)) - ;; XXX: This procedure is mistakenly private in Guile-Git 0.1.0. - (workdir ((@@ (git repository) repository-working-directory) - repository)) + (workdir (repository-working-directory repository)) (head (repository-head repository)) (oid (reference-target head)) (commit (commit-lookup repository oid))