diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-11-10 16:03:48 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-11-10 23:33:46 +0100 |
| commit | bc1ff4aabafc8e1dbc8196d0eaef911806c74099 (patch) | |
| tree | 38f4996a09edd9efee6f32e235815461c37cd14f /guix/gnu-maintenance.scm | |
| parent | 37ebc19cfbfdb248e8d36cbb587a89780e2e93c1 (diff) | |
| download | gnu-guix-bc1ff4aabafc8e1dbc8196d0eaef911806c74099.tar gnu-guix-bc1ff4aabafc8e1dbc8196d0eaef911806c74099.tar.gz | |
gnu-maintenance: ".sign" and ".asc" files no longer match 'release-file?'.
* guix/gnu-maintenance.scm (release-file?): Exclude ".sign" and ".asc"
file in addition to ".sig".
Diffstat (limited to 'guix/gnu-maintenance.scm')
| -rw-r--r-- | guix/gnu-maintenance.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm index 3634f4bb27..21cb353f50 100644 --- a/guix/gnu-maintenance.scm +++ b/guix/gnu-maintenance.scm @@ -247,7 +247,7 @@ network to check in GNU's database." (define (release-file? project file) "Return #f if FILE is not a release tarball of PROJECT, otherwise return true." - (and (not (string-suffix? ".sig" file)) + (and (not (member (file-extension file) '("sig" "sign" "asc"))) (and=> (regexp-exec %tarball-rx file) (lambda (match) ;; Filter out unrelated files, like `guile-www-1.1.1'. |