From ae738c29eb0e091d2399fc6abec5bd8405e67f38 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Manuel=20P=C3=A9gouri=C3=A9-Gonnard?= <mpg@elzevir.fr>
Date: Wed, 1 Jul 2015 19:32:00 +0200
Subject: [PATCH] Fix warning from Perl 5.21 in helper script

---
 tests/scripts/list-enum-consts.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/scripts/list-enum-consts.pl b/tests/scripts/list-enum-consts.pl
index c8e26366c..633e3fdf9 100755
--- a/tests/scripts/list-enum-consts.pl
+++ b/tests/scripts/list-enum-consts.pl
@@ -14,7 +14,7 @@ my @consts;
 my $state = 'out';
 while (<>)
 {
-    if( $state eq 'out' and /^(typedef )?enum {/ ) {
+    if( $state eq 'out' and /^(typedef )?enum \{/ ) {
         $state = 'in';
     } elsif( $state eq 'out' and /^(typedef )?enum/ ) {
         $state = 'start';