X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main.cgi;h=624fe37d15607a0a4f6504e59ebea5e6aec56558;hp=a0fc2d67bda458203dd02a2b2492f49edc35fcd5;hb=8ed2714fc50607081d7ac4edf0b17e23902dabba;hpb=0a7ce21242738438169d6e9dba8856770ffa1af4 diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi index a0fc2d67b..624fe37d1 100755 --- a/httemplate/view/cust_main.cgi +++ b/httemplate/view/cust_main.cgi @@ -713,7 +713,7 @@ function cust_credit_areyousure(href) { } } if ( $cust_credit->credited > 0 ) { - $desc .= ' - $'. + $desc .= '  $'. $cust_credit->credited. ' unapplied'. qq! (apply)'. @@ -891,15 +891,8 @@ sub get_packages { } - foreach my $cust_svc ( - qsearch( 'cust_svc', { - 'pkgnum' => $cust_pkg->pkgnum, - #'svcpart' => $part_svc->svcpart, - } - ) - ) { - - warn "svcnum ". $cust_svc->svcnum. " / svcpart ". $cust_svc->svcpart. "\n"; + foreach my $cust_svc ( $cust_pkg->cust_svc ) { + #warn "svcnum ". $cust_svc->svcnum. " / svcpart ". $cust_svc->svcpart. "\n"; my $svc = { 'svcnum' => $cust_svc->svcnum, 'label' => ($cust_svc->label)[1],