[freeside-commits] freeside/FS/FS cust_main.pm, 1.464.2.18, 1.464.2.19
Jeff Finucane,420,,
jeff at wavetail.420.am
Wed Dec 30 18:51:01 PST 2009
Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv17617
Modified Files:
Tag: FREESIDE_1_9_BRANCH
cust_main.pm
Log Message:
really reduce the noise
Index: cust_main.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main.pm,v
retrieving revision 1.464.2.18
retrieving revision 1.464.2.19
diff -u -d -r1.464.2.18 -r1.464.2.19
--- cust_main.pm 30 Dec 2009 06:06:12 -0000 1.464.2.18
+++ cust_main.pm 31 Dec 2009 02:50:57 -0000 1.464.2.19
@@ -7875,10 +7875,11 @@
? 'ship_'
: '';
- my ($zip,$plus4) = ( '', '' );
- ($zip,$plus4) = split /-/, $self->get("${prefix}zip")
+ my($zip,$plus4) = split /-/, $self->get("${prefix}zip")
if $self->country eq 'US';
+ $zip ||= '';
+ $plus4 ||= '';
#CCH specific location stuff
my $extra_sql = "AND plus4lo <= '$plus4' AND plus4hi >= '$plus4'";
More information about the freeside-commits
mailing list