X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fcust_main.cgi;h=baacd5e7e9b275028943e1445443281c85ecd1eb;hb=167a699ce4eaa68a56cd8d38a79696840ef46679;hp=ed285ca15e909abc68fde47a3f8d9a00134209f0;hpb=1bde07fabf19b6948c3e4173d17b04db396e55bd;p=freeside.git

diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi
index ed285ca15..baacd5e7e 100755
--- a/httemplate/edit/process/cust_main.cgi
+++ b/httemplate/edit/process/cust_main.cgi
@@ -97,6 +97,11 @@ my $new = new FS::cust_main ( {
   (map { ( "ship_$_", '' ) } (FS::cust_main->location_fields))
 } );
 
+# add any virtual fields to the new cust_main record
+foreach ($new->virtual_fields) {
+  $new->setfield($_, scalar($cgi->param($_)));
+}
+
 warn Dumper( $new ) if $DEBUG > 1;
 
 if ( $duplicate_of ) {
@@ -187,10 +192,7 @@ if ( $cgi->param('residential_commercial') eq 'Residential' ) {
     $error = 'Email address required';
   }
 
-  #$email =~ s/\s+/\, /g;
-  #$options{'invoicing_list'} = [ split(/\s*,\s*/, $email) ];
   $options{'invoicing_list'} = [ split(/[,\s]+/, $email) ];
-  #[:,\s\/]+
   # XXX really should include the phone numbers in here also
 
 } else {