projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update address standardization for cust_location changes
[freeside.git]
/
httemplate
/
edit
/
process
/
cust_location.cgi
diff --git
a/httemplate/edit/process/cust_location.cgi
b/httemplate/edit/process/cust_location.cgi
index
790fc8e
..
b9f93db
100644
(file)
--- a/
httemplate/edit/process/cust_location.cgi
+++ b/
httemplate/edit/process/cust_location.cgi
@@
-28,10
+28,12
@@
my $cust_location = qsearchs({
});
die "unknown locationnum $locationnum" unless $cust_location;
});
die "unknown locationnum $locationnum" unless $cust_location;
-my $new = {
+my $new = FS::cust_location->new({
+ custnum => $cust_location->custnum,
+ prospectnum => $cust_location->prospectnum,
map { $_ => scalar($cgi->param($_)) }
qw( address1 address2 city county state zip country )
map { $_ => scalar($cgi->param($_)) }
qw( address1 address2 city county state zip country )
-};
+}
)
;
my $error = $cust_location->move_to($new);
my $error = $cust_location->move_to($new);