followup fix that should probably have been in a7c6dfa05
This commit is contained in:
parent
e9b0975838
commit
65334e6931
|
@ -172,7 +172,8 @@
|
||||||
(cond
|
(cond
|
||||||
[(eq? (system-type) 'windows)
|
[(eq? (system-type) 'windows)
|
||||||
(cond
|
(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)
|
(and (regexp-match? #rx"c:m" cs)
|
||||||
(not (regexp-match? #rx"~c:m" cs))))
|
(not (regexp-match? #rx"~c:m" cs))))
|
||||||
#f]
|
#f]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user