01/01: guix: svn: Remove all .svn folders.

[julien lepiller]

roptat pushed a commit to branch staging
in repository guix.

commit dd1e45335e135fe724acece440782344ef8ca9fd
Author: Julien Lepiller <address@hidden>
Date:   Fri Jul 6 18:32:50 2018 +0200

    guix: svn: Remove all .svn folders.
    
    * guix/build/svn.scm (svn-fetch): Remove all .svn folders as they contain
    timestamps.
---
 guix/build/svn.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/build/svn.scm b/guix/build/svn.scm
index 252d1d4..913f894 100644
--- a/guix/build/svn.scm
+++ b/guix/build/svn.scm
@@ -51,7 +51,7 @@ valid Subversion revision.  Return #t on success, #f 
otherwise."
   ;; of the repo.  Since we want a fixed output, this directory needs
   ;; to be taken out.
   (with-directory-excursion directory
-    (delete-file-recursively ".svn"))
+    (for-each delete-file-recursively (find-files "." "^\\.svn$" 
#:directories? #t)))
 
   #t)