r1267@llin: dpavlin | 2007-05-27 16:44:54 +0200

 sort fields in stats

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@855 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/lib/WebPAC/Input.pm b/lib/WebPAC/Input.pm
index 4cd56f1..958e967 100644 (file)
--- a/lib/WebPAC/Input.pm
+++ b/lib/WebPAC/Input.pm
@@ -540,7 +540,7 @@ sub stats {
                        }
 
                        $o;
-               } sort { $a cmp $b } keys %{ $s->{fld} }
+               } sort { $a <=> $b } keys %{ $s->{fld} }
        );
 
        $log->debug( sub { dump($s) } );