~ruther/guix-local

6d6d19322124dcd963e801453ed026620634d0b3 — Ludovic Courtès 8 years ago 4b879e0
lint: 'refresh' gracefully handles lack of networking access.

* guix/scripts/lint.scm (check-for-updates): Wrap
'package-latest-release*' call in 'with-networking-fail-safe'.
1 files changed, 5 insertions(+), 1 deletions(-)

M guix/scripts/lint.scm
M guix/scripts/lint.scm => guix/scripts/lint.scm +5 -1
@@ 869,7 869,11 @@ the NIST server non-fatal."

(define (check-for-updates package)
  "Check if there is an update available for PACKAGE."
  (match (package-latest-release* package (force %updaters))
  (match (with-networking-fail-safe
          (format #f (G_ "while retrieving upstream info for '~a'")
                  (package-name package))
          #f
          (package-latest-release* package (force %updaters)))
    ((? upstream-source? source)
     (when (version>? (upstream-source-version source)
                      (package-version package))