X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=bin%2Fcreate_index_pages;h=3e9fc529f63ff74fe27dcc2590370e1e3c0c297c;hb=50961b4eb963cdd14a4362fa8bab7335d5f504ca;hp=8072fa48fec3ca70441b800735b44b98d0617aa3;hpb=4fec9449ddf3d2a6162c05387367746f3e17e329;p=deb%2Fpackages.git

diff --git a/bin/create_index_pages b/bin/create_index_pages
index 8072fa4..3e9fc52 100755
--- a/bin/create_index_pages
+++ b/bin/create_index_pages
@@ -188,12 +188,18 @@ foreach my $source (("", "source/")) {
     foreach my $s (@SUITES) {
 	my %common_vars = ( suite => $s,
 			    is_source => $source );
-	close_file("$source$s", \%common_vars, 'allpackages');
-	close_txt_file("$source$s", \%common_vars, 'allpackages');
+	my $page_base = "$source$s/";
+	close_file("$source$s", { %common_vars,
+				  page_name => "${page_base}allpackages" },
+		   'allpackages');
+	close_txt_file("$source$s", { %common_vars,
+				      page_name => "{$page_base}allpackages" },
+		       'allpackages');
 
 	foreach my $sec (keys %{$sections->{$s}}) {
 	    close_file("$source$s/$sec",
 		       { %common_vars,
+			 page_name => "$page_base$sec/",
 			 category => { id => N_('Section'),
 				       name => $sec }});
 	}
@@ -201,6 +207,7 @@ foreach my $source (("", "source/")) {
 	    next if $ssec eq '-';
 	    close_file("$source$s/$ssec",
 		       { %common_vars,
+			 page_name => "$page_base$ssec/",
 			 category => { id => N_('Subsection'),
 				       name => $ssec }});
 	}
@@ -208,6 +215,7 @@ foreach my $source (("", "source/")) {
 	    next if $prio eq '-';
 	    close_file("$source$s/$prio",
 		       { %common_vars,
+			 page_name => "$page_base$prio/",
 			 category => { id => N_('Priority'),
 				       name => $prio }});
 	}