[M] is not <[M]>

TimToady · TimToady · commit 33746c6546cf · 2013-05-04T10:25:21.000-07:00
diff --git a/S05-modifier/ignorecase.t b/S05-modifier/ignorecase.t
@@ -76,9 +76,9 @@ ok 'a' ~~ /:i < A B > /, ':i and quote words';
 
 # RT #77410
 {
-    ok  "m" ~~ /:i [M]/, "ignore case of character classes";
-    nok "m" ~~ /[M]/,    "ignore case of character classes";
-    nok "n" ~~ /:i [M]/, "ignore case of character classes";
+    ok  "m" ~~ /:i <[M]>/, "ignore case of character classes";
+    nok "m" ~~ /<[M]>/,    "ignore case of character classes";
+    nok "n" ~~ /:i <[M]>/, "ignore case of character classes";
 }
 
 # vim: syn=perl6 sw=4 ts=4 expandtab

Original file line number	Diff line number	Diff line change
`@@ -76,9 +76,9 @@ ok 'a' ~~ /:i < A B > /, ':i and quote words';`
`76`	`76`
`77`	`77`	`# RT #77410`
`78`	`78`	`{`
`79`		`- ok "m" ~~ /:i [M]/, "ignore case of character classes";`
`80`		`- nok "m" ~~ /[M]/, "ignore case of character classes";`
`81`		`- nok "n" ~~ /:i [M]/, "ignore case of character classes";`
	`79`	`+ ok "m" ~~ /:i <[M]>/, "ignore case of character classes";`
	`80`	`+ nok "m" ~~ /<[M]>/, "ignore case of character classes";`
	`81`	`+ nok "n" ~~ /:i <[M]>/, "ignore case of character classes";`
`82`	`82`	`}`
`83`	`83`
`84`	`84`	`# vim: syn=perl6 sw=4 ts=4 expandtab`