mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu-maintenance: 'gnu' and 'gnu-ftp' predicates catch networking errors.
Previously, in a networking-less environment such as 'guix shell -C -D guix', 'guix refresh --list-updaters' would crash due to a 'gettaddrinfo-error' exception in these predicates. * guix/gnu-maintenance.scm (%gnu-updater)[pred]: Wrap in 'false-if-networking-error'. (%gnu-ftp-updater)[pred]: Likewise.
This commit is contained in:
parent
f3edf29c67
commit
472dd29f37
1 changed files with 5 additions and 3 deletions
|
@ -883,7 +883,8 @@ (define %gnu-updater
|
|||
(upstream-updater
|
||||
(name 'gnu)
|
||||
(description "Updater for GNU packages")
|
||||
(pred gnu-hosted?)
|
||||
(pred (lambda (package)
|
||||
(false-if-networking-error (gnu-hosted? package))))
|
||||
(import import-gnu-release)))
|
||||
|
||||
(define %gnu-ftp-updater
|
||||
|
@ -893,8 +894,9 @@ (define %gnu-ftp-updater
|
|||
(name 'gnu-ftp)
|
||||
(description "Updater for GNU packages only available via FTP")
|
||||
(pred (lambda (package)
|
||||
(and (not (gnu-hosted? package))
|
||||
(pure-gnu-package? package))))
|
||||
(false-if-networking-error
|
||||
(and (not (gnu-hosted? package))
|
||||
(pure-gnu-package? package)))))
|
||||
(import import-release*)))
|
||||
|
||||
(define %savannah-updater
|
||||
|
|
Loading…
Reference in a new issue