suzanne.soy/distro-build
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

distro-build/config: fix string checking for uppercase

Browse Source
This commit is contained in:
Matthew Flatt 2015-08-29 19:11:06 -06:00
parent 7730ddb73c
commit cf4e6d2b8a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
distro-build-server/config.rkt
View File

@ -182,7 +182,7 @@
(and (string? s) (and (string? s)
;; No spaces, quotes, or other things that could ;; No spaces, quotes, or other things that could
;; break a command-line, path, or URL construction: ;; 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) (define (email? s)
(and (string? s) (and (string? s)