www

commit cf4e6d2b8a8904f25a015db60dc7b2c6380e477c
parent 7730ddb73c3b2b8e15f6f35c0fdb8f5b010de168
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Sat, 29 Aug 2015 19:11:06 -0600

distro-build/config: fix string checking for uppercase

Diffstat:
M
distro-build-server/config.rkt
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/distro-build-server/config.rkt b/distro-build-server/config.rkt
@@ -182,7 +182,7 @@
   (and (string? s)
        ;; No spaces, quotes, or other things that could
        ;; break a command-line, path, or URL construction:
-       (regexp-match #rx"^[-a-zA-A0-9.]*$" s)))
+       (regexp-match #rx"^[-a-zA-Z0-9.]*$" s)))
 
 (define (email? s)
   (and (string? s)