tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-13 16:40:40 +02:00
Code Activity

packages: <content-hash> printer gracefully handle #f values.

Browse Source 
Suggested by Robin Green <greenrd@greenrd.org>.

* guix/packages.scm (print-content-hash): Gracefully deal with cases
with 'content-hash-value' returns #f, as is the case for 'linux-libre'.
This commit is contained in:
Ludovic Courtès
2020-08-31 12:24:21 +02:00
parent b03267df6d
commit 83ec969cc7
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
guix/packages.scm
View File

@@ -228,7 +228,8 @@ as base32. Otherwise, it must be a bytevector."
(define (print-content-hash hash port)
(format port "#<content-hash ~a:~a>"
(content-hash-algorithm hash)
(bytevector->nix-base32-string (content-hash-value hash))))
(and=> (content-hash-value hash)
bytevector->nix-base32-string)))
(set-record-type-printer! <content-hash> print-content-hash)