diff options
Diffstat (limited to 'gnu/packages/taler.scm')
| -rw-r--r-- | gnu/packages/taler.scm | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/gnu/packages/taler.scm b/gnu/packages/taler.scm index 9d3289cdfb6..b4c15e4c232 100644 --- a/gnu/packages/taler.scm +++ b/gnu/packages/taler.scm | |||
| @@ -42,18 +42,9 @@ | |||
| 42 | (sha256 | 42 | (sha256 |
| 43 | (base32 | 43 | (base32 |
| 44 | "1lhcvqlazsqbj391d7dlp6rzblld4jij8z2vym2cbgz4mzb2vqj1")) | 44 | "1lhcvqlazsqbj391d7dlp6rzblld4jij8z2vym2cbgz4mzb2vqj1")) |
| 45 | (modules '((guix build utils) | 45 | (modules '((guix build utils))) |
| 46 | (ice-9 ftw) | ||
| 47 | (srfi srfi-26))) | ||
| 48 | (snippet | 46 | (snippet |
| 49 | #~(begin | 47 | #~(begin |
| 50 | ;; XXX: 'delete-all-but' is copied from the turbovnc package. | ||
| 51 | (define (delete-all-but directory . preserve) | ||
| 52 | (with-directory-excursion directory | ||
| 53 | (let* ((pred (negate (cut member <> | ||
| 54 | (cons* "." ".." preserve)))) | ||
| 55 | (items (scandir "." pred))) | ||
| 56 | (for-each (cut delete-file-recursively <>) items)))) | ||
| 57 | ;; Delete 3rd party bundled Sphinx extensions. | 48 | ;; Delete 3rd party bundled Sphinx extensions. |
| 58 | (delete-all-but "_exts" | 49 | (delete-all-but "_exts" |
| 59 | ;; These are custom extensions. | 50 | ;; These are custom extensions. |
