From 65615896de6e2474953722ea25122174b151d289 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 5 Apr 2004 11:55:35 +0000
Subject: apply some heuristics to transfer ordering: primaries first, then
 sorted by quantity

---
 httemplate/view/cust_main.cgi | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

(limited to 'httemplate')

diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index dd9cd3075..624fe37d1 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -891,14 +891,7 @@ sub get_packages {
 
     }
 
-    foreach my $cust_svc (
-      qsearch( 'cust_svc', {
-                             'pkgnum' => $cust_pkg->pkgnum,
-                             #'svcpart' => $part_svc->svcpart,
-                           }
-      )
-    ) {
-
+    foreach my $cust_svc ( $cust_pkg->cust_svc ) {
       #warn "svcnum ". $cust_svc->svcnum. " / svcpart ". $cust_svc->svcpart. "\n";
       my $svc = {
         'svcnum' => $cust_svc->svcnum,
-- 
cgit v1.2.1