Re: [PATCH] lint: add 'source' checker.

[Ludovic Courtès]

Cyril Roelandt <address@hidden> skribis:

> +(define (check-source package)
> +  ""
> +  (let ((origin (package-source package)))
> +    (when (and origin
> +               (eqv? (origin-method origin) url-fetch))
> +      (let* ((strings (origin-uri origin))
> +             (uris (if (list? strings)
> +                       (map string->uri strings)
> +                       (list (string->uri strings)))))

I realized while fixing it in list-packages.scm that mirror:// URIs
actually need to be expanded here.  See commit 1c69e4c for an example.

Ludo’.