nixo
/
gri3-wm
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

This commit is contained in:
Michael Stapelberg 2012-01-16 21:20:48 +00:00
parent 4f975aa060
commit a59090ac2e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
generate-command-parser.pl
View File

@ -90,7 +90,7 @@ for my $line (@lines) {
next_state => $action, next_state => $action,
}; };
if (exists $states{$current_state}) { if (exists $states{$current_state}) {
push $states{$current_state}, $store_token; push @{$states{$current_state}}, $store_token;
} else { } else {
$states{$current_state} = [ $store_token ]; $states{$current_state} = [ $store_token ];
} }