From 8bf4363a26e89b0d378ce3505339c98e18040cd6 Mon Sep 17 00:00:00 2001 From: eknauel Date: Sat, 28 May 2005 09:43:10 +0000 Subject: [PATCH] fix type in regexp --- scheme/std-command.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/std-command.scm b/scheme/std-command.scm index ca6707c..2e78438 100644 --- a/scheme/std-command.scm +++ b/scheme/std-command.scm @@ -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)