From efb94d3aa8757433784de25966555efe62c7ed34 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Fri, 22 Jun 2007 00:39:30 +0100 Subject: [PATCH] * Use cmp instead of <=> because db-h/ isn't numeric --- scripts/expire.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) { -- 2.39.5