summaryrefslogtreecommitdiff
path: root/guix/lint.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-08-27 23:59:48 +0200
committerLudovic Courtès <ludo@gnu.org>2019-08-28 00:27:14 +0200
commit58d5f280a36e1cfddfa999d320c285726d8a8bc1 (patch)
tree811b3c55d28a5c60e51c6ecb0917d22533e73823 /guix/lint.scm
parentdd4e46edda6c255ca170a6650c6f92b16ff50a3f (diff)
downloadpatches-58d5f280a36e1cfddfa999d320c285726d8a8bc1.tar
patches-58d5f280a36e1cfddfa999d320c285726d8a8bc1.tar.gz
lint: Correct use of 'with-networking-fail-safe'.
Fixes <https://bugs.gnu.org/37160>. Reported by Jonathan Brielmaier <jonathan.brielmaier@web.de>. * guix/lint.scm (check-for-updates): Make sure the first argument to 'with-networking-fail-safe' is the whole error message.
Diffstat (limited to 'guix/lint.scm')
-rw-r--r--guix/lint.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/lint.scm b/guix/lint.scm
index 7a2bf5a347..212ff70d54 100644
--- a/guix/lint.scm
+++ b/guix/lint.scm
@@ -1008,8 +1008,8 @@ the NIST server non-fatal."
(define (check-for-updates package)
"Check if there is an update available for PACKAGE."
(match (with-networking-fail-safe
- (G_ "while retrieving upstream info for '~a'")
- (list (package-name package))
+ (format #f (G_ "while retrieving upstream info for '~a'")
+ (package-name package))
#f
(package-latest-release* package (force %updaters)))
((? upstream-source? source)