diff options
author | Mark Wells <mark@freeside.biz> | 2016-08-03 16:16:28 -0700 |
---|---|---|
committer | Jonathan Prykop <jonathan@freeside.biz> | 2016-08-03 18:54:20 -0500 |
commit | 5fc19693596421fcd080fdf26724a2eb11e1a743 (patch) | |
tree | cc71c3e94a652be1641c89a9629fd4db41e581ca | |
parent | 60985040921a59d5bda7894f00b321a4f2cbad17 (diff) |
strip degree signs from coord fields before saving CGI param state, workaround for #71518
-rwxr-xr-x | httemplate/edit/process/cust_main.cgi | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi index 04516e984..715e87377 100755 --- a/httemplate/edit/process/cust_main.cgi +++ b/httemplate/edit/process/cust_main.cgi @@ -59,6 +59,12 @@ if ( $conf->exists('agent-ship_address', $cgi->param('agentnum')) ) { my %locations; for my $pre (qw(bill ship)) { + foreach (qw( latitude longitude)) { + my $coord = $cgi->param($pre.'_'.$_); + $coord =~ s/\N{DEGREE SIGN}\s*$//; + $cgi->param($pre.'_'.$_, $coord); + } + my %hash; foreach ( FS::cust_main->location_fields ) { $hash{$_} = scalar($cgi->param($pre.'_'.$_)); |