[freeside-commits] freeside/FS/FS cust_main_invoice.pm, 1.18.2.1, 1.18.2.2

Ivan,,, ivan at wavetail.420.am
Sun Sep 14 13:24:56 PDT 2008


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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_main_invoice.pm 
Log Message:
silently strip out leading and trailing spaces from invoicing email addresses instead of throwing an error

Index: cust_main_invoice.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main_invoice.pm,v
retrieving revision 1.18.2.1
retrieving revision 1.18.2.2
diff -u -d -r1.18.2.1 -r1.18.2.2
--- cust_main_invoice.pm	1 Apr 2008 08:43:40 -0000	1.18.2.1
+++ cust_main_invoice.pm	14 Sep 2008 20:24:54 -0000	1.18.2.2
@@ -132,7 +132,7 @@
   } elsif ( $self->dest =~ /^(\d+)$/ ) {
     return "Unknown local account (specified by svcnum: ". $self->dest. ")"
       unless qsearchs( 'svc_acct', { 'svcnum' => $self->dest } );
-  } elsif ( $self->dest =~ /^([\w\.\-\&\+]+)\@(([\w\.\-]+\.)+\w+)$/ ) {
+  } elsif ( $self->dest =~ /^\s*([\w\.\-\&\+]+)\@(([\w\.\-]+\.)+\w+)\s*$/ ) {
     my($user, $domain) = ($1, $2);
     $self->dest("$1\@$2");
   } else {



More information about the freeside-commits mailing list