noise reduction
authorjeff <jeff>
Wed, 30 Dec 2009 02:26:15 +0000 (02:26 +0000)
committerjeff <jeff>
Wed, 30 Dec 2009 02:26:15 +0000 (02:26 +0000)
FS/FS/cust_main.pm

index 329b461..de83625 100644 (file)
@@ -2071,7 +2071,7 @@ sub _cust_pkg {
 # This should be generalized to use config options to determine order.
 sub sort_packages {
   
 # This should be generalized to use config options to determine order.
 sub sort_packages {
   
-  my $locationsort = $a->locationnum <=> $b->locationnum;
+  my $locationsort = ( $a->locationnum || 0 ) <=> ( $b->locationnum || 0 );
   return $locationsort if $locationsort;
 
   if ( $a->get('cancel') xor $b->get('cancel') ) {
   return $locationsort if $locationsort;
 
   if ( $a->get('cancel') xor $b->get('cancel') ) {