fix type in regexp

This commit is contained in:
eknauel 2005-05-28 09:43:10 +00:00
parent 73e5192db0
commit 8bf4363a26
1 changed files with 1 additions and 1 deletions

View File

@ -27,7 +27,7 @@
(define (contains-glob-enumerator? arg)
(if-match
(regexp-search
(rx (: (submatch (* any)) ("{[") (* any) (submatch (* any)) ("})")))
(rx (: (submatch (* any)) ("{[") (* any) (submatch (* any)) ("]}")))
arg)
(whole-arg submatch-before submatch-after)
(not (or (string-suffix? "\\" submatch-before)