Bugfix: Make generate-command-parser.pl compatible with perl 5.10

next
Michael Stapelberg 2012-01-16 21:20:48 +00:00
parent 4f975aa060
commit a59090ac2e
1 changed files with 1 additions and 1 deletions

View File

@ -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 ];
}