diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2021-04-05 11:30:20 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2021-04-05 12:03:09 +0200 |
| commit | ceeea60bbc1e2be6a86cef208fcd80eb61c92934 (patch) | |
| tree | 3ebb78fca53483cb962029e8cb8e08316898e9e2 /guix | |
| parent | 6f32e27e970c2f92e5ee1b5b5ce513c61484178e (diff) | |
gnu-maintenance: Recognize more source tarball naming schemes.
* guix/gnu-maintenance.scm (%package-name-rx): Add ".src" and ".orig"
suffixes.
* tests/gnu-maintenance.scm ("release-file?"): Add mpg321 and bvi
examples.
("tarball->version"): New test.
Diffstat (limited to 'guix')
| -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 c7972d13a5..0390df59f1 100644 --- a/guix/gnu-maintenance.scm +++ b/guix/gnu-maintenance.scm @@ -595,7 +595,7 @@ list available from %GNU-FILE-LIST-URI over HTTP(S)." (define %package-name-rx ;; Regexp for a package name, e.g., "foo-X.Y". Since TeXmacs uses ;; "TeXmacs-X.Y-src", the `-src' suffix is allowed. - (make-regexp "^(.*)[-_](([0-9]|\\.)+)(-src)?")) + (make-regexp "^(.*)[-_](([0-9]|\\.)+)(-src|\\.src|\\.orig)?")) (define (gnu-package-name->name+version name+version) "Return the package name and version number extracted from NAME+VERSION." |