gnu-maintenance: 'release-file?' rejects checksum files.

* guix/gnu-maintenance.scm (release-file?): Reject ".md5sum",
".sha1sum", and ".sha256sum".
This commit is contained in:
Ludovic Courtès 2021-03-13 17:51:22 +01:00
parent db69ebb9de
commit 9e75b31b39
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -247,7 +247,9 @@ (define %alpha-tarball-rx
(define (release-file? project file)
"Return #f if FILE is not a release tarball of PROJECT, otherwise return
true."
(and (not (member (file-extension file) '("sig" "sign" "asc")))
(and (not (member (file-extension file)
'("sig" "sign" "asc"
"md5sum" "sha1sum" "sha256sum")))
(and=> (regexp-exec %tarball-rx file)
(lambda (match)
;; Filter out unrelated files, like `guile-www-1.1.1'.