X-Git-Url: https://git.deb.at/w?a=blobdiff_plain;f=bin%2Fcreate_index_pages;h=8b20ebd7fcf010be4e0306ea4b18d328a990c965;hb=0d5547e211c0c21886db6f4f9a7b4ac70848408a;hp=d9dc8b43b60bc000a9380631941bffabd23b53a8;hpb=56d4b3ed57e20359e5ea46feabb850cf4a94caf2;p=deb%2Fpackages.git

diff --git a/bin/create_index_pages b/bin/create_index_pages
index d9dc8b4..8b20ebd 100755
--- a/bin/create_index_pages
+++ b/bin/create_index_pages
@@ -61,7 +61,7 @@ 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: $!";
 	    my $index_title = sprintf( _g( "List of sections in \"%s\"" ),
-				       $s );
+				       $key );
 	    print {$pages{$key}{$lang}{index}{fh}} header( title => $index_title,
 							   title_keywords => "debian, $s",
 							   desc => encode_entities( $index_title, '"' ),
@@ -105,7 +105,7 @@ foreach my $s (@SUITES) {
 	    or die "can't open index file for output: $!";
 
 	my $title = sprintf( _g( "Software Packages in \"%s\"" ),
-			     $s );
+			     $key );
 	print {$pages{$key}{fh}} header( title => $title,
 					 title_keywords => "debian, $s",
 					 desc => encode_entities( $title, '"' ),
@@ -117,7 +117,7 @@ foreach my $s (@SUITES) {
 	    open $pages{$key}{$sec}{fh}, '>', "$wwwdir/$key/$sec/index.en.html.new"
 		or die "can't open index file for output: $!";
 	    $title = sprintf( _g( "Software Packages in \"%s\", section %s" ),
-			      $s, $sec );
+			      $key, $sec );
 	    print {$pages{$key}{$sec}{fh}} header( title => $title,
 						   title_keywords => "debian, $s, $sec",
 						   desc => encode_entities( $title, '"' ),
@@ -130,7 +130,7 @@ foreach my $s (@SUITES) {
 	    open $pages{$key}{$ssec}{fh}, '>', "$wwwdir/$key/$ssec/index.en.html.new"
 		or die "can't open index file for output: $!";
 	    $title = sprintf( _g( "Software Packages in \"%s\", subsection %s" ),
-			      $s, $ssec );
+			      $key, $ssec );
 	    print {$pages{$key}{$ssec}{fh}} header( title => $title,
 						    title_keywords => "debian, $s, $ssec",
 						    desc => encode_entities( $title, '"' ),
@@ -143,7 +143,7 @@ foreach my $s (@SUITES) {
 	    open $pages{$key}{$prio}{fh}, '>', "$wwwdir/$key/$prio/index.en.html.new"
 		or die "can't open index file for output: $!";
 	    $title = sprintf( _g( "Software Packages in \"%s\", priority %s" ),
-			      $s, $prio );
+			      $key, $prio );
 	    print {$pages{$key}{$prio}{fh}} header( title => $title,
 						    title_keywords => "debian, $s, $prio",
 						    desc => encode_entities( $title, '"' ),