guard the repositories warning

closes PR 12842
This commit is contained in:
Robby Findler 2012-06-10 04:19:30 -05:00
parent 948a4d6184
commit d4ab45f6c5

View File

@ -711,9 +711,10 @@
(λ (x) (and (list? x)
(srfi1:lset<= equal? x '("3xx" "4.x"))))
(announce "Repositories: ~s\n" repositories)
(unless repositories
(warn (string-append
"Package's info.rkt does not contain a repositories field."
" The package will be listed in all repositories by default."))]
" The package will be listed in all repositories by default.")))]
[version
string?
(announce "Version description: ~a\n" version)]))])