mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu-maintenance: Add missing type check.
* guix/gnu-maintenance.scm (gnu-package?): Only call 'mirror-type' when URL is a string.
This commit is contained in:
parent
1d4628329d
commit
515eba4543
1 changed files with 1 additions and 1 deletions
|
@ -176,7 +176,7 @@ (define (mirror-type url)
|
|||
|
||||
(let ((url (and=> (package-source package) origin-uri))
|
||||
(name (package-name package)))
|
||||
(case (and url (mirror-type url))
|
||||
(case (and (string? url) (mirror-type url))
|
||||
((gnu) #t)
|
||||
((non-gnu) #f)
|
||||
(else
|
||||
|
|
Loading…
Reference in a new issue