From 2c0f0e57b328a52844cab95466046942be1c9c4f Mon Sep 17 00:00:00 2001
From: Martin Quinson <martin.quinson@loria.fr>
Date: Tue, 20 Mar 2012 15:43:03 +0100
Subject: [PATCH] avoid a warning with perl 5.14

---
 tools/doxygen/index_create.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/doxygen/index_create.pl b/tools/doxygen/index_create.pl
index 9be03abd71..b9474656c2 100755
--- a/tools/doxygen/index_create.pl
+++ b/tools/doxygen/index_create.pl
@@ -47,7 +47,7 @@ print OUTPUT <<EOF;
 
 EOF
 
-foreach $type qw(define enumeration enumvalue function typedef) {
+foreach $type (qw(define enumeration enumvalue function typedef)) {
     if(defined $database{$type}) {
 	print OUTPUT "<h2>$type</h2> \n  <ul>\n";
 	foreach $name (sort keys %{$database{$type}}) {
-- 
2.20.1