[freeside-commits] freeside/FS/FS cust_pkg.pm, 1.204.2.9, 1.204.2.10

[Ivan,,,]

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

Modified Files:
      Tag: FREESIDE_2_3_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.204.2.9
retrieving revision 1.204.2.10
diff -u -w -d -r1.204.2.9 -r1.204.2.10
--- cust_pkg.pm	18 Aug 2011 23:39:12 -0000	1.204.2.9
+++ cust_pkg.pm	18 Aug 2011 23:43:44 -0000	1.204.2.10
@@ -3018,18 +3018,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 ',