From: Ivan Kohler Date: Thu, 14 Mar 2013 00:05:15 +0000 (-0700) Subject: fix arrayref svcpart searching for freeside-username_list, RT#21054 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=9eadd8ddc44109c36ac69ec100dca39ac2dd3f78;p=freeside.git fix arrayref svcpart searching for freeside-username_list, RT#21054 --- diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 7737a7052..1bfdde0d6 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -2882,8 +2882,14 @@ sub search { } # svcpart - if ( $params->{'svcpart'} =~ /^(\d+)$/ ) { - push @where, "svcpart = $1"; + if ( $params->{'svcpart'} ) { + my @svcpart = ref( $params->{'svcpart'} ) + ? @{ $params->{'svcpart'} } + : $params->{'svcpart'} + ? ( $params->{'svcpart'} ) + : (); + @svcpart = grep /^(\d+)$/, @svcpart; + push @where, 'svcpart IN ('. join(',', @svcpart ). ')' if @svcpart; } if ( $params->{'exportnum'} =~ /^(\d+)$/ ) {