projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
91c530c
)
fix dup password checking on add'l package order
author
ivan
<ivan>
Mon, 21 Jun 2004 14:24:21 +0000
(14:24 +0000)
committer
ivan
<ivan>
Mon, 21 Jun 2004 14:24:21 +0000
(14:24 +0000)
fs_selfservice/FS-SelfService/cgi/agent.cgi
patch
|
blob
|
history
diff --git
a/fs_selfservice/FS-SelfService/cgi/agent.cgi
b/fs_selfservice/FS-SelfService/cgi/agent.cgi
index
a219fe7
..
9b07ee1
100644
(file)
--- a/
fs_selfservice/FS-SelfService/cgi/agent.cgi
+++ b/
fs_selfservice/FS-SelfService/cgi/agent.cgi
@@
-208,14
+208,16
@@
sub view_customer {
sub process_order_pkg {
sub process_order_pkg {
+ my $results = '';
+
if ( $cgi->param('_password') ne $cgi->param('_password2') ) {
my $init_data = signup_info( 'session_id' => $session_id );
if ( $cgi->param('_password') ne $cgi->param('_password2') ) {
my $init_data = signup_info( 'session_id' => $session_id );
- $
error = $init_data->{msgcat}{passwords_dont_match}; #msgcat
+ $
results = { error => $init_data->{msgcat}{passwords_dont_match} };
$cgi->param('_password', '');
$cgi->param('_password2', '');
}
$cgi->param('_password', '');
$cgi->param('_password2', '');
}
-
my $results
= order_pkg (
+
$results ||
= order_pkg (
'agent_session_id' => $session_id,
map { $_ => $cgi->param($_) }
qw( custnum pkgpart username _password _password2 sec_phrase popnum )
'agent_session_id' => $session_id,
map { $_ => $cgi->param($_) }
qw( custnum pkgpart username _password _password2 sec_phrase popnum )