projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git]
/
bin
/
sendmail.import
diff --git
a/bin/sendmail.import
b/bin/sendmail.import
index
b137433
..
ef745fc
100644
(file)
--- a/
bin/sendmail.import
+++ b/
bin/sendmail.import
@@
-144,7
+144,9
@@
sub svcnum_or_literal {
my $svc_domain = qsearchs('svc_domain', { 'domain' => $domain } );
my $domsvc = $svc_domain ? $svc_domain->svcnum : '';
my $svc_domain = qsearchs('svc_domain', { 'domain' => $domain } );
my $domsvc = $svc_domain ? $svc_domain->svcnum : '';
- my @svc_acct = grep { grep { $_->cust_svc->svcpart == $_ } @svcpart }
+ my @svc_acct = grep { my $svc_acct = $_;
+ grep { $svc_acct->cust_svc->svcpart == $_ } @svcpart
+ }
qsearch('svc_acct', {
'username' => $username,
'domsvc' => $domsvc,
qsearch('svc_acct', {
'username' => $username,
'domsvc' => $domsvc,