diff options
author | ivan <ivan> | 2004-07-15 22:40:01 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-07-15 22:40:01 +0000 |
commit | 6ced9264b8ec79e4b460be90ede25ec72a7dfc16 (patch) | |
tree | 1f55573018ede308c5992be02bc4a81e8fab31a2 /fs_selfservice/FS-SelfService/cgi/agent.cgi | |
parent | 582e73e52fd2f0324e8836ee66ae69e7a82ed364 (diff) |
big update for customer self-service: add provisioning/unprovisioning of purchased services, like fs_selfadmin
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/agent.cgi')
-rw-r--r-- | fs_selfservice/FS-SelfService/cgi/agent.cgi | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/agent.cgi b/fs_selfservice/FS-SelfService/cgi/agent.cgi index 2d948e790..6d2fd5840 100644 --- a/fs_selfservice/FS-SelfService/cgi/agent.cgi +++ b/fs_selfservice/FS-SelfService/cgi/agent.cgi @@ -221,6 +221,10 @@ sub process_order_pkg { my $results = ''; + unless ( length($cgi->param('_password')) ) { + my $init_data = signup_info( 'session_id' => $session_id ); + $results = { 'error' => $init_data->{msgcat}{empty_password} } + } if ( $cgi->param('_password') ne $cgi->param('_password2') ) { my $init_data = signup_info( 'session_id' => $session_id ); $results = { error => $init_data->{msgcat}{passwords_dont_match} }; |