summaryrefslogtreecommitdiff
path: root/gnu/packages/version-control.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/version-control.scm')
-rw-r--r--gnu/packages/version-control.scm10
1 files changed, 1 insertions, 9 deletions
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 5fdbf1dfce2..68d508de6bb 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -3731,17 +3731,9 @@ modification time.")
3731 (check-in version))) 3731 (check-in version)))
3732 (sha256 3732 (sha256
3733 (base32 "16zrha8vb4dwfmyq86iaz2xz4k91dh018bk94xkxgqbyrr33nm7y")) 3733 (base32 "16zrha8vb4dwfmyq86iaz2xz4k91dh018bk94xkxgqbyrr33nm7y"))
3734 (modules '((guix build utils) 3734 (modules '((guix build utils)))
3735 (ice-9 ftw)
3736 (srfi srfi-26)))
3737 (snippet 3735 (snippet
3738 #~(begin 3736 #~(begin
3739 (define (delete-all-but directory . preserve)
3740 (with-directory-excursion directory
3741 (let* ((pred (negate (cut member <>
3742 (cons* "." ".." preserve))))
3743 (items (scandir "." pred)))
3744 (for-each (cut delete-file-recursively <>) items))))
3745 (delete-all-but "autosetup" "proj.tcl" "wh-common.tcl") 3737 (delete-all-but "autosetup" "proj.tcl" "wh-common.tcl")
3746 (delete-file-recursively "extsrc"))))) 3738 (delete-file-recursively "extsrc")))))
3747 (build-system gnu-build-system) 3739 (build-system gnu-build-system)