3
4
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

utils: 'tarball-sans-extension' recognizes ".tgz".

* guix/utils.scm (tarball-sans-extension): Add ".tgz".
This commit is contained in:
Ludovic Courtès 2021-04-04 22:24:42 +02:00
parent e917027d1f
commit 6f32e27e97
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -696,6 +696,7 @@ VERSIONS. For example:
(define (tarball-sans-extension tarball)
"Return TARBALL without its .tar.* or .zip extension."
(let ((end (or (string-contains tarball ".tar")
(string-contains tarball ".tgz")
(string-contains tarball ".zip"))))
(substring tarball 0 end)))