Permalink
Browse files

S04-declarations/state: fix will start { 42 } fossil (TimToady)

  • Loading branch information...
1 parent 4bae023 commit 01f6069ea77a88665ef841005b9a6e646a0230af @sorear sorear committed Jul 12, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 S04-declarations/state.t
View
2 S04-declarations/state.t
@@ -119,7 +119,7 @@ plan 40;
{
my ($a, $b);
my $gen = {
- state $svar will start { 42 };
+ state $svar will start { $_ = 42 };
-> { $svar++ };
}
$a = $gen(); # $svar == 42

0 comments on commit 01f6069

Please sign in to comment.