From: Don Armstrong <don@donarmstrong.com>
Date: Thu, 21 Jun 2007 23:39:30 +0000 (+0100)
Subject:  * Use cmp instead of <=> because db-h/ isn't numeric
X-Git-Tag: release/2.6.0~538^2~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=efb94d3aa8757433784de25966555efe62c7ed34;p=debbugs.git

 * Use cmp instead of <=> because db-h/ isn't numeric
---

diff --git a/scripts/expire.in b/scripts/expire.in
index 1b27dcee..d5149e94 100755
--- a/scripts/expire.in
+++ b/scripts/expire.in
@@ -78,7 +78,7 @@ chdir($config{spool_dir}) || die "chdir $config{spool_dir} failed: $!\n";
 
 #get list of bugs (ie, status files)
 opendir(DIR,"db-h") or die "Unable to open dir db-h: $!";
-my @dirs = sort { $a <=> $b } grep(s,^,db-h/,, grep(m/^\d+$/,readdir(DIR)));
+my @dirs = sort { $a cmp $b } grep(s,^,db-h/,, grep(m/^\d+$/,readdir(DIR)));
 close(DIR);
 my @list;
 foreach my $dir (@dirs) {