use strict;
+# Add here the pages of the documentation generated by a @page doxygen macro
+my @extra_files = qw(html/index.html html/faq.html html/publis.html html/pages.html html/modules.html html/contrib.html index.php);
+
my %debug;
$debug{'parse'} = 0; # show how we parse the module tree
$debug{'input'} = 0; # display the resulting tree
+$debug{'handle'}= 0; # Be verbose on the post-processing
$debug{'rename'}= 0; # do not overwrite the files (allows several debuging runs without rerunning doxygen)
my @allfiles;
my $current=shift;
my $level=shift;
+ print "Handle $current->{'file'} at level $level\n" if $debug{'handle'};
+
# we generate the tabs bottom up begining from where we are in the tree
# and display them top down, as it should in a file
my @tabs = ();
$newname =~ s/.html/.new.html/;
open TO,">$newname" || die;
while (<FROM>) {
- # add "current" to the module API granfather page
- s|<li><a href="modules.html"><span>Modules API</span></a></li>|<li id="current"><a href="modules.html"><span>Modules API</span></a></li>|;
-
+ # add "current" to the module API granfather page
+ s|<li><a href="modules.html"><span>[^<]*</span></a></li>|<li id="current"><a href="modules.html"><span>Modules API</span></a></li>|;
print TO $_;
last if m|</ul></div>|;
}
###
### Post-processsing common to all pages
###
-map {push @allfiles,$_} qw(html/index.html html/faq.html html/publis.html html/pages.html html/modules.html index.php);
+map {push @allfiles,$_} @extra_files;
foreach my $file (@allfiles) {
open FROM,"$file" || die;