[freeside-commits] freeside/httemplate/search cust_pay.cgi, 1.30, 1.30.2.1

Ivan,,, ivan at wavetail.420.am
Tue Jun 26 11:58:26 PDT 2007


Update of /home/cvs/cvsroot/freeside/httemplate/search
In directory wavetail:/tmp/cvs-serv14533

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_pay.cgi 
Log Message:
fix check# search

Index: cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/search/cust_pay.cgi,v
retrieving revision 1.30
retrieving revision 1.30.2.1
diff -u -d -r1.30 -r1.30.2.1
--- cust_pay.cgi	3 Feb 2007 11:36:30 -0000	1.30
+++ cust_pay.cgi	26 Jun 2007 18:58:23 -0000	1.30.2.1
@@ -154,6 +154,12 @@
       }
     }
 
+    if ( $cgi->param('payinfo') ) {
+      $cgi->param('payinfo') =~ /^\s*(\d+)\s*$/
+        or die "illegal payinfo ". $cgi->param('payinfo');
+      push @search, "cust_pay.payinfo = '$1'";
+    }
+
     my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi);
     push @search, "_date >= $beginning ",
                   "_date <= $ending";
@@ -198,6 +204,8 @@
 
 } else {
 
+  #hmm... is this still used?
+
   $cgi->param('payinfo') =~ /^\s*(\d+)\s*$/ or die "illegal payinfo";
   my $payinfo = $1;
 



More information about the freeside-commits mailing list