Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
reintroduce table of contents
[simgrid.git] / tools / doxygen / toc_create.pl
index c5b2b46..52c08da 100755 (executable)
@@ -38,10 +38,13 @@ sub handle_file {
   }
   close FILE;
 
   }
   close FILE;
 
-  my $outfile = ".$infile.toc";
+  my $outfile = "$infile.toc";
+  $outfile =~ s|\./||g;
   $outfile =~ s|\.\./||g;
   $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";
   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";
   }
   print OUTPUT "</div>\n";
   print OUTPUT "<!-- End of automatically generated table of contents --!>\n";
+  close OUTPUT;
 } # sub handle_file
 
 
 } # sub handle_file
 
 
-map { handle_file($_) } @ARGV;
\ No newline at end of file
+map { handle_file($_) } @ARGV;