diff options
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/signup.cgi')
| -rwxr-xr-x | fs_selfservice/FS-SelfService/cgi/signup.cgi | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/signup.cgi b/fs_selfservice/FS-SelfService/cgi/signup.cgi index da595437c..7d1679b5c 100755 --- a/fs_selfservice/FS-SelfService/cgi/signup.cgi +++ b/fs_selfservice/FS-SelfService/cgi/signup.cgi @@ -141,7 +141,7 @@ if ( -e $decline_html ) { $cgi = new CGI; -$init_data = signup_info( 'agentnum' => $agentnum, +$init_data = signup_info( 'agentnum' => $agentnum || scalar($cgi->param('agentnum')), 'promo_code' => scalar($cgi->param('promo_code')), 'reg_code' => uc(scalar($cgi->param('reg_code'))), ); @@ -320,8 +320,14 @@ sub print_collect { } sub print_decline { + my $r = { + %{$init_data}, + }; + print $cgi->header( '-expires' => 'now' ), - $decline_template->fill_in(); + $decline_template->fill_in( PACKAGE => 'FS::SelfService::_signupcgi', + HASH => $r + ); } sub print_okay { @@ -389,6 +395,8 @@ sub print_okay { print $cgi->header( '-expires' => 'now' ), $success_template->fill_in( HASH => { + %{$init_data}, + email_name => $email_name, pkg => $pkg, part_pkg => \$part_pkg, |