lint: archival: Gracefully handle packages with a #f hash value.
Fixes <https://bugs.gnu.org/47293>. Reported by Luis Felipe. * guix/lint.scm (check-archival): Check whether 'content-hash-value' returns true.
This commit is contained in:
parent
bc8554ecb1
commit
4ac3e010c9
1 changed files with 2 additions and 1 deletions
|
@ -1264,7 +1264,8 @@ try again later")
|
||||||
((? origin? origin)
|
((? origin? origin)
|
||||||
;; Since "save" origins are not supported for non-VCS source, all
|
;; Since "save" origins are not supported for non-VCS source, all
|
||||||
;; we can do is tell whether a given tarball is available or not.
|
;; we can do is tell whether a given tarball is available or not.
|
||||||
(if (origin-hash origin) ;XXX: for ungoogled-chromium
|
(if (and=> (origin-hash origin) ;XXX: for ungoogled-chromium
|
||||||
|
content-hash-value) ;& icecat
|
||||||
(let ((hash (origin-hash origin)))
|
(let ((hash (origin-hash origin)))
|
||||||
(match (lookup-content (content-hash-value hash)
|
(match (lookup-content (content-hash-value hash)
|
||||||
(symbol->string
|
(symbol->string
|
||||||
|
|
Reference in a new issue