diff options
Diffstat (limited to 'gnu/packages/golang-apps.scm')
| -rw-r--r-- | gnu/packages/golang-apps.scm | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/gnu/packages/golang-apps.scm b/gnu/packages/golang-apps.scm index 80ad63d8535..cc0c06be3e0 100644 --- a/gnu/packages/golang-apps.scm +++ b/gnu/packages/golang-apps.scm | |||
| @@ -193,17 +193,9 @@ definitions in Go programs.") | |||
| 193 | (file-name (git-file-name name version)) | 193 | (file-name (git-file-name name version)) |
| 194 | (sha256 | 194 | (sha256 |
| 195 | (base32 "0c1rxbj3v3m0fqb8q96xlbawxm9scyx6vvr8pddkiwp7zkx4ajym")) | 195 | (base32 "0c1rxbj3v3m0fqb8q96xlbawxm9scyx6vvr8pddkiwp7zkx4ajym")) |
| 196 | (modules '((guix build utils) | 196 | (modules '((guix build utils))) |
| 197 | (ice-9 ftw) | ||
| 198 | (srfi srfi-26))) | ||
| 199 | (snippet | 197 | (snippet |
| 200 | #~(begin | 198 | #~(begin |
| 201 | (define (delete-all-but directory . preserve) | ||
| 202 | (with-directory-excursion directory | ||
| 203 | (let* ((pred (negate (cut member <> | ||
| 204 | (cons* "." ".." preserve)))) | ||
| 205 | (items (scandir "." pred))) | ||
| 206 | (for-each (cut delete-file-recursively <>) items)))) | ||
| 207 | (delete-all-but "cmd" "godoc") | 199 | (delete-all-but "cmd" "godoc") |
| 208 | (delete-all-but "." "cmd"))))) | 200 | (delete-all-but "." "cmd"))))) |
| 209 | (build-system go-build-system) | 201 | (build-system go-build-system) |
