fix `raco link' collection-name checking

This commit is contained in:
Matthew Flatt 2011-08-26 12:33:05 -06:00
parent 5d27959c57
commit 5579b12da0

View File

@ -16,7 +16,7 @@
#:repair? [repair? #f]
. dirs)
(define (check-name name)
(unless (and (regexp-match #rx"^[a-zA-z+_%-]+$" name)
(unless (and (regexp-match #rx"^[a-zA-z0-9+_%-]+$" name)
(module-path? name))
(error 'links "name is not valid as a top-level collection name: ~e"
name)))