From 49d91de7635adfd269d0108def2df70e2c1832d6 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Tue, 15 Jul 2014 00:10:10 -0500 Subject: guix: refresh: Correctly identify invalid package names. * guix/scripts/refresh.scm (guix-refresh): Check for null list returned by find-packages-by-name rather than #f. --- guix/scripts/refresh.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/guix/scripts/refresh.scm b/guix/scripts/refresh.scm index c65a7d0cfb..af7beb748b 100644 --- a/guix/scripts/refresh.scm +++ b/guix/scripts/refresh.scm @@ -201,8 +201,8 @@ (define core-package? (filter-map (match-lambda (('argument . value) (let ((p (find-packages-by-name value))) - (unless p - (leave (_ "~a: no package by that name") + (when (null? p) + (leave (_ "~a: no package by that name~%") value)) p)) (_ #f)) -- cgit v1.2.3