X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=bin%2Fcreate_index_pages;h=2c62033ddce7a22d6a3155b906ad7b99ce214904;hp=79d6e9e78b016bba7c35c93811abdad842263451;hb=4cb36e543bb889e040b1c95b6d697582e28eeec2;hpb=c7fa3b64deedb2cb435054099c3da6a8c2b262cf diff --git a/bin/create_index_pages b/bin/create_index_pages index 79d6e9e..2c62033 100755 --- a/bin/create_index_pages +++ b/bin/create_index_pages @@ -71,7 +71,7 @@ foreach my $s (@SUITES) { my %content = ( subsections => [], suite => $s, lang => $lang, charset => $charset, - suites => \@SUITES ); + used_langs => \@LANGUAGES, suites => \@SUITES ); $content{make_search_url} = sub { return &Packages::CGI::make_search_url(@_) }; $content{make_url} = sub { return &Packages::CGI::make_url(@_) }; # needed to work around the limitations of the the FILTER syntax @@ -93,7 +93,6 @@ foreach my $s (@SUITES) { open $pages{$key}{$lang}{index}{fh}, '>', "$wwwdir/$key/index.$lang.html.new" or die "can't open index file for output: $!"; print {$pages{$key}{$lang}{index}{fh}} $template->page( 'suite_index', \%content ); - print {$pages{$key}{$lang}{index}{fh}} $template->trailer( 'index', $lang, \@LANGUAGES ); close $pages{$key}{$lang}{index}{fh} or warn "can't close index file $wwwdir/$key/index.$lang.html.new: $!"; rename( "$wwwdir/$key/index.$lang.html.new", @@ -103,7 +102,6 @@ foreach my $s (@SUITES) { open $pages{$key}{$lang}{source_index}{fh}, '>', "$wwwdir/source/$key/index.$lang.html.new" or die "can't open index file for output: $!"; print {$pages{$key}{$lang}{source_index}{fh}} $template->page( 'suite_index', \%content ); - print {$pages{$key}{$lang}{source_index}{fh}} $template->trailer( 'index', $lang, \@LANGUAGES ); close $pages{$key}{$lang}{source_index}{fh} or warn "can't close index file $wwwdir/source/$key/index.$lang.html.new: $!"; rename( "$wwwdir/source/$key/index.$lang.html.new",