From a59090ac2e034f73ad24f4356b886698e7f8bd30 Mon Sep 17 00:00:00 2001
From: Michael Stapelberg <michael@stapelberg.de>
Date: Mon, 16 Jan 2012 21:20:48 +0000
Subject: [PATCH] Bugfix: Make generate-command-parser.pl compatible with perl
 5.10

---
 generate-command-parser.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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