[freeside-commits] freeside/FS/FS cust_pkg.pm, 1.179.2.33, 1.179.2.34

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv17917/FS/FS

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	cust_pkg.pm 
Log Message:
attempt fixing "multiple states" links, RT#13922

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.179.2.33
retrieving revision 1.179.2.34
diff -u -w -d -r1.179.2.33 -r1.179.2.34
--- cust_pkg.pm	18 Aug 2011 23:39:43 -0000	1.179.2.33
+++ cust_pkg.pm	18 Aug 2011 23:43:40 -0000	1.179.2.34
@@ -3012,18 +3012,15 @@
          } @report_option;
   }
 
-  foreach my $any ( grep /^report_option_any/ keys %$params ) {
+  foreach my $any ( grep /^report_option_any/, keys %$params ) {
 
     my @report_option_any = ();
-    if ( exists($params->{$any}) ) {
       if ( ref($params->{$any}) eq 'ARRAY' ) {
         @report_option_any = @{ $params->{$any} };
       } elsif ( $params->{$any} =~ /^([,\d]*)$/ ) {
         @report_option_any = split(',', $1);
       }
 
-    }
-
     if (@report_option_any) {
       # this will result in the empty set for the dangling comma case as it should
       push @where, ' ( '. join(' OR ',