X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/4dfc24c5da80e3b04c507df7f6855db23508ebdc..d5452f2220046484642bb07f9e870663bc5f054d:/tools/doxygen/toc_create.pl

diff --git a/tools/doxygen/toc_create.pl b/tools/doxygen/toc_create.pl
index c5b2b46bb8..52c08da4b6 100755
--- a/tools/doxygen/toc_create.pl
+++ b/tools/doxygen/toc_create.pl
@@ -38,10 +38,13 @@ sub handle_file {
   }
   close FILE;
 
-  my $outfile = ".$infile.toc";
+  my $outfile = "$infile.toc";
+  $outfile =~ s|\./||g;
   $outfile =~ s|\.\./||g;
   $outfile =~ s|/|_|g;
-  open OUTPUT,"> $outfile";
+  $outfile = ".$outfile";
+  print "<<<<< $infile -> $outfile >>>>>>\n";
+  open OUTPUT,"> ./$outfile";
   my($current_level)=-1;
   my($entry);
   print OUTPUT "<!-- Automatically generated table of contents --!>\n";
@@ -70,7 +73,8 @@ sub handle_file {
   }
   print OUTPUT "</div>\n";
   print OUTPUT "<!-- End of automatically generated table of contents --!>\n";
+  close OUTPUT;
 } # sub handle_file
 
 
-map { handle_file($_) } @ARGV;
\ No newline at end of file
+map { handle_file($_) } @ARGV;