doh, revert stuff that shouldn't have been checked in
authorivan <ivan>
Tue, 5 Aug 2003 21:00:43 +0000 (21:00 +0000)
committerivan <ivan>
Tue, 5 Aug 2003 21:00:43 +0000 (21:00 +0000)
httemplate/browse/part_pkg.cgi

index 7b9436c..2a167e8 100755 (executable)
@@ -24,7 +24,9 @@ if ( $cgi->param('active') ) {
     $num_active_cust_pkg{$part_pkg->pkgpart} =
       $active_sth->fetchrow_arrayref->[0];
   }
-  $sortby = \*active_cust_pkg_sort;
+  $sortby = sub {
+    $num_active_cust_pkg{$b->pkgpart} <=> $num_active_cust_pkg{$a->pkgpart};
+  };
 } else {
   $sortby = \*pkgpart_sort;
 }
@@ -132,13 +134,8 @@ print <<END;
 </HTML>
 END
 
-
 sub pkgpart_sort {
   $a->pkgpart <=> $b->pkgpart;
 }
 
-sub active_cust_pkg_sort {
-  $num_active_cust_pkg{$b->pkgpart} <=> $num_active_cust_pkg{$a->pkgpart};
-}
-
 %>