followup fix that should probably have been in a7c6dfa05

This commit is contained in:
Robby Findler 2013-12-03 09:44:02 -06:00
parent e9b0975838
commit 65334e6931

View File

@ -172,7 +172,8 @@
(cond
[(eq? (system-type) 'windows)
(cond
[(or (regexp-match? #rx"a:c" cs)
[(or (and (regexp-match? #rx"a:c" cs)
(not (regexp-match? #rx"~a:c" cs)))
(and (regexp-match? #rx"c:m" cs)
(not (regexp-match? #rx"~c:m" cs))))
#f]