projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 82949 - changes section name from fees to pricing, better opiton
[freeside.git]
/
httemplate
/
edit
/
process
/
cust_main.cgi
diff --git
a/httemplate/edit/process/cust_main.cgi
b/httemplate/edit/process/cust_main.cgi
index
088576f
..
baacd5e
100755
(executable)
--- 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))
} );
(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 ) {
warn Dumper( $new ) if $DEBUG > 1;
if ( $duplicate_of ) {
@@
-187,7
+192,7
@@
if ( $cgi->param('residential_commercial') eq 'Residential' ) {
$error = 'Email address required';
}
$error = 'Email address required';
}
- $options{'invoicing_list'} = [ split(/
\s*,\s*
/, $email) ];
+ $options{'invoicing_list'} = [ split(/
[,\s]+
/, $email) ];
# XXX really should include the phone numbers in here also
} else {
# XXX really should include the phone numbers in here also
} else {