X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/5b3677b425b9cc6949c1573d59ac772540cbf4b2..4a6b0a991a67e6f2f67c03fed43529e078da7115:/tools/doxygen/index_create.pl

diff --git a/tools/doxygen/index_create.pl b/tools/doxygen/index_create.pl
index f9f58d2953..bad8593e0e 100755
--- a/tools/doxygen/index_create.pl
+++ b/tools/doxygen/index_create.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
 # Copyright (c) 2005, 2012-2014. The SimGrid Team.
 # All rights reserved.
@@ -6,6 +6,8 @@
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the license (GNU LGPL) which comes with this package.
 
+use warnings;
+
 ($#ARGV >= 1) or die "Usage: index_create.pl <input-tag-file> <output-doc-file>";
 
 my($type) = "";
@@ -64,7 +66,12 @@ foreach $type (qw(define enumeration enumvalue function typedef)) {
 	    if($type eq "function") {
 		print OUTPUT "\t<LI> $name()</LI>\n";
 	    } else {
-		print OUTPUT "\t<LI> #$name</LI>\n";
+          if($type eq "enumeration") {
+		    print OUTPUT "\t<LI> ".$name."::EType</LI>\n";
+          }
+          else {
+		    print OUTPUT "\t<LI> #$name</LI>\n";
+          }
 	    }
 	}
 	print OUTPUT "\n  </ul>\n";