tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00
Code Activity

disarchive-manifest: Filter out origins without a hash.

Browse Source 
* etc/disarchive-manifest.scm (disarchive-collection): Filter out
origins with a phony hash.
This commit is contained in:
Ludovic Courtès
2022-08-05 09:19:47 +02:00
parent bd956bc57b
commit 6d4a0ccecb
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
etc/disarchive-manifest.scm
View File

@@ -99,6 +99,12 @@ an empty directory if ORIGIN could not be disassembled."
(directory-union "disarchive-collection"
(filter-map (lambda (origin)
(and (tarball-origin? origin)
;; Dismiss origins with (sha256 #f) such
;; as that of IceCat.
(and=> (origin-hash origin)
content-hash-value)
(origin->disarchive origin)))
origins)
#:copy? #t))