weather: '--coverage' filters out non-package objects.
This is a followup to d37b5a1b58
.
* guix/scripts/weather.scm (guix-weather): Filter PACKAGES passed to
'report-package-coverage'.
master
parent
be764b47ad
commit
a0feabdfdb
|
@ -552,7 +552,11 @@ SERVER. Display information for packages with at least THRESHOLD dependents."
|
|||
(match (assoc-ref opts 'coverage)
|
||||
(#f #f)
|
||||
(threshold
|
||||
(report-package-coverage server packages systems
|
||||
;; PACKAGES may include non-package objects coming from a
|
||||
;; manifest. Filter them out.
|
||||
(report-package-coverage server
|
||||
(filter package? packages)
|
||||
systems
|
||||
#:threshold threshold)))
|
||||
|
||||
(= 1 coverage))
|
||||
|
|
Reference in New Issue