lint: archival: Warn about non-origin sources.
* guix/lint.scm (check-archival): Warn about non-origin sources.
This commit is contained in:
parent
cb06f7c61e
commit
163d6385fd
1 changed files with 5 additions and 1 deletions
|
@ -1562,7 +1562,11 @@ Disarchive entry refers to non-existent SWH directory '~a'")
|
||||||
#:field 'source)))))))
|
#:field 'source)))))))
|
||||||
((? content?)
|
((? content?)
|
||||||
'())))
|
'())))
|
||||||
'()))))
|
'()))
|
||||||
|
(_
|
||||||
|
(list (make-warning package
|
||||||
|
(G_ "unsupported source type")
|
||||||
|
#:field 'source)))))
|
||||||
(match-lambda*
|
(match-lambda*
|
||||||
(('swh-error url method response)
|
(('swh-error url method response)
|
||||||
(response->warning url method response))
|
(response->warning url method response))
|
||||||
|
|
Reference in a new issue