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

sorear · sorear · commit 01f6069ea77a · 2011-07-11T23:47:41.000-07:00
diff --git a/S04-declarations/state.t b/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
