diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2019-08-13 20:42:06 +0200 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2019-08-13 20:42:06 +0200 |
| commit | 462ad9f56b9665b8d22960acee73ad91f1052c9c (patch) | |
| tree | 814be463d6d0517e7db9b9e6f15dbc7516955674 /guix/build/svn.scm | |
| parent | 7f5f61ae99321a7a6e08b0100cd428e11ce6a837 (diff) | |
| parent | 1b1b006afd31c5526f34d157baef492c7dde2e9c (diff) | |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/build/svn.scm')
| -rw-r--r-- | guix/build/svn.scm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/guix/build/svn.scm b/guix/build/svn.scm index 913f89471b..e3188add3e 100644 --- a/guix/build/svn.scm +++ b/guix/build/svn.scm @@ -36,7 +36,7 @@ "Fetch REVISION from URL into DIRECTORY. REVISION must be an integer, and a valid Subversion revision. Return #t on success, #f otherwise." (apply invoke svn-command - "checkout" "--non-interactive" + "export" "--non-interactive" ;; Trust the server certificate. This is OK as we ;; verify the checksum later. This can be removed when ;; ca-certificates package is added. @@ -46,13 +46,6 @@ valid Subversion revision. Return #t on success, #f otherwise." (string-append "--password=" password)) '()) ,url ,directory)) - - ;; The contents of '.svn' vary as a function of the current status - ;; of the repo. Since we want a fixed output, this directory needs - ;; to be taken out. - (with-directory-excursion directory - (for-each delete-file-recursively (find-files "." "^\\.svn$" #:directories? #t))) - #t) ;;; svn.scm ends here |