branch master updated: guix: Fix download-svn-to-store.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

pgarlick pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 735808b  guix: Fix download-svn-to-store.
735808b is described below

commit 735808b12cc23909b421e10e212a07e7aa69a5eb
Author: Paul Garlick <pgarlick@tourbillion-technology.com>
AuthorDate: Mon Sep 14 14:01:15 2020 +0100

    guix: Fix download-svn-to-store.
    
    * guix/svn-download.scm (download-svn-to-store): Add a subdirectory to
    the download path.  The subdirectory is used as the target for the 'svn
    export' command, avoiding a 'directory exists' error when attempting to
    use the parent directory directly.
---
 guix/svn-download.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/guix/svn-download.scm b/guix/svn-download.scm
index 59e2eb8..b961512 100644
--- a/guix/svn-download.scm
+++ b/guix/svn-download.scm
@@ -159,10 +159,11 @@ reports to LOG."
             (parameterize ((current-output-port log))
               (build:svn-fetch (svn-reference-url ref)
                                (svn-reference-revision ref)
-                               temp
+                               (string-append temp "/svn")
                                #:user-name (svn-reference-user-name ref)
                                #:password (svn-reference-password ref)))))
        (and result
-            (add-to-store store name #t "sha256" temp))))))
+            (add-to-store store name #t "sha256"
+                          (string-append temp "/svn")))))))
 
 ;;; svn-download.scm ends here