From f3c0d70cb29c99029b4adc5a1d9f058442e72ffc Mon Sep 17 00:00:00 2001
From: kcwu <kcwu@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>
Date: Thu, 31 Aug 2006 17:10:03 +0000
Subject: bug fix: sort banip list numerically instead of dictionary order

git-svn-id: http://opensvn.csie.org/pttbbs/trunk/pttbbs@3408 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
---
 util/banip.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'util')

diff --git a/util/banip.pl b/util/banip.pl
index 50374d81..da36c619 100644
--- a/util/banip.pl
+++ b/util/banip.pl
@@ -143,7 +143,7 @@ foreach( @list ){
 }
 print scalar keys %hash, ",\n";
 
-foreach (sort keys %hash) {
+foreach (sort { $a <=> $b } keys %hash) {
     print "${_}U,\t";
     print "\n" if ++$i % 4 == 0;
 }
-- 
cgit v1.2.3