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.
This commit is contained in:
Eric Bavier 2014-07-15 00:10:10 -05:00
parent 5af6de3e67
commit 49d91de763

View file

@ -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))