From: Michael Stapelberg <michael@stapelberg.de>
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/?a=commitdiff_plain;h=a59090ac2e034f73ad24f4356b886698e7f8bd30;p=i3%2Fi3

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