diff options
| author | Paul Garlick <pgarlick@tourbillion-technology.com> | 2020-09-14 14:01:15 +0100 |
|---|---|---|
| committer | Paul Garlick <pgarlick@tourbillion-technology.com> | 2020-09-14 14:24:29 +0100 |
| commit | 735808b12cc23909b421e10e212a07e7aa69a5eb (patch) | |
| tree | b5a5077c65a6d413a5b2b187f51ac0e5b9b0894d | |
| parent | bc5dcd9ef5f82f68398010a2a4bcb95a35007896 (diff) | |
| download | guix-735808b12cc23909b421e10e212a07e7aa69a5eb.tar.gz | |
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.
| -rw-r--r-- | guix/svn-download.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/svn-download.scm b/guix/svn-download.scm index 59e2eb8d07..b96151234c 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 |