X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fsvc_acct.cgi;h=2154bf22c93d277bef21c0734402a47f52dcab74;hb=6412f71a3557249225abf5eb2096ebad1729c585;hp=5847270010696647e9c38bf0eef1fae5d3147d78;hpb=eb75efa2c03350afff1fa29f8d4c8c6b3827900a;p=freeside.git diff --git a/httemplate/edit/svc_acct.cgi b/httemplate/edit/svc_acct.cgi index 584727001..2154bf22c 100755 --- a/httemplate/edit/svc_acct.cgi +++ b/httemplate/edit/svc_acct.cgi @@ -1,5 +1,5 @@ <% - +# use strict; use vars qw( $conf $cgi @shells $action $svcnum $svc_acct $pkgnum $svcpart @@ -128,7 +128,8 @@ if ( $part_svc->svc_acct__domsvc_flag eq "F" ) { map { qsearch('cust_svc', { 'pkgnum' => $_->pkgnum } ) } qsearch('cust_pkg', { 'custnum' => $cust_pkg->custnum } ); foreach my $cust_svc ( @cust_svc ) { - $svc_domain = qsearchs('svc_domain', { 'svcnum' => $_->svcnum } ); + my $svc_domain = + qsearchs('svc_domain', { 'svcnum' => $cust_svc->svcnum } ); push @svc_domain, $svc_domain if $svc_domain; } } else {