tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-05-15 05:35:53 +02:00
Code Activity

utils: ‘compressed-file?’ recognizes .zst and .tzst.

Browse Source 
This ensures ‘guix publish’ does not re-compress zst files.

* guix/utils.scm (compressed-file?): Add ‘tzst’ and ‘zst’.

Change-Id: Iae39e8826f1fc242d2e15d86c82a8ff84797002e
This commit is contained in:
Ludovic Courtès
2024-09-11 15:56:00 +02:00
parent b2f5a9dd67
commit 7573300128
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
guix/utils.scm
+2 -1
View File
@@ -973,7 +973,8 @@ VERSIONS. For example:
(define (compressed-file? file)
"Return true if FILE denotes a compressed file."
(->bool (member (file-extension file)
'("gz" "bz2" "xz" "lz" "lzma" "tgz" "tbz2" "zip"))))
'("gz" "bz2" "xz" "lz" "lzma" "tgz" "tbz2" "tzst"
"zip" "zst"))))
(define* (string-replace-substring str substr replacement
#:optional