From 3a47c79b1f2ac08024c9d2908b4fc0935cf8274a Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Mon, 19 Apr 2004 09:03:53 -0800
Subject: [PATCH] [project @ 2004-04-19 10:03:53 by cjwatson] Fix db2html
 package page ordering.

---
 debian/changelog   | 1 +
 scripts/db2html.in | 7 ++++---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 1c2e8afb..217ec859 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -19,6 +19,7 @@ debbugs (2.4.2) UNRELEASED; urgency=low
       directory (closes: #222118).
     - New standalone SpamAssassin queue runner, spamscan.
     - Allow # prefix on bug numbers in 'merge' command.
+    - Fix some ordering issues in old-style package pages and summaries.
 
   * Adam Heath:
     - Rewrite filtering in cgi's common.pl, to make it completely generic.
diff --git a/scripts/db2html.in b/scripts/db2html.in
index c0f20d87..b45d2b95 100755
--- a/scripts/db2html.in
+++ b/scripts/db2html.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: db2html.in,v 1.21 2003/08/30 00:15:15 cjwatson Exp $
+# $Id: db2html.in,v 1.22 2004/04/19 10:03:53 cjwatson Exp $
 # usage: db2html [-diff] [-stampfile=<stampfile>] [-lastrun=<days>] <wwwbase>
 
 #load the necessary libraries/configuration
@@ -87,13 +87,14 @@ close(MM);
 
 #load all database files
 opendir(D,'db-h') || &quit("opendir db-h: $!");
-@dirs = sort { $a <=> $b } grep(s#^#db-h/#,grep(/^\d+$/,readdir(D)));
+@dirs = grep(s#^#db-h/#,grep(/^\d+$/,readdir(D)));
 closedir(D);
 foreach my $dir (@dirs) {
     opendir(D,$dir);
-    push @files, sort { $a <=> $b } grep(/^-?\d+\.log$/,readdir(D));
+    push @files, grep(/^-?\d+\.log$/,readdir(D));
     closedir(D);
 }
+@files = sort { $a <=> $b } @files;
 
 for $pending (qw(pending done forwarded)) 
 {	for $severity (@showseverities) 
-- 
2.39.5