From: Michael Stapelberg Date: Mon, 16 Jan 2012 21:20:48 +0000 (+0000) Subject: Bugfix: Make generate-command-parser.pl compatible with perl 5.10 X-Git-Tag: 4.2~144 X-Git-Url: https://git.sur5r.net/?p=i3%2Fi3;a=commitdiff_plain;h=a59090ac2e034f73ad24f4356b886698e7f8bd30 Bugfix: Make generate-command-parser.pl compatible with perl 5.10 --- diff --git a/generate-command-parser.pl b/generate-command-parser.pl index 9220b30e..175d7101 100755 --- a/generate-command-parser.pl +++ b/generate-command-parser.pl @@ -90,7 +90,7 @@ for my $line (@lines) { next_state => $action, }; if (exists $states{$current_state}) { - push $states{$current_state}, $store_token; + push @{$states{$current_state}}, $store_token; } else { $states{$current_state} = [ $store_token ]; }