Fix test for RT#123776

skids · skids · commit e369518ece1a · 2015-08-20T15:11:35.000-04:00
diff --git a/S04-phasers/begin.t b/S04-phasers/begin.t
@@ -77,8 +77,8 @@ plan 13;
 # RT #123776
 #?rakudo todo 'RT#123776'
 {
-    my $bound = 'bar';
-    BEGIN { $bound = 'foo'; }
+    my $bound;
+    BEGIN { $bound := 'foo'; }
     is $bound, 'foo', "Value bound to variable in BEGIN persists";
 }
 

Original file line number	Diff line number	Diff line change
`@@ -77,8 +77,8 @@ plan 13;`
`77`	`77`	`# RT #123776`
`78`	`78`	`#?rakudo todo 'RT#123776'`
`79`	`79`	`{`
`80`		`- my $bound = 'bar';`
`81`		`- BEGIN { $bound = 'foo'; }`
	`80`	`+ my $bound;`
	`81`	`+ BEGIN { $bound := 'foo'; }`
`82`	`82`	`is $bound, 'foo', "Value bound to variable in BEGIN persists";`
`83`	`83`	`}`
`84`	`84`