diff options
Diffstat (limited to 'httemplate/edit/process/reg_code.cgi')
| -rw-r--r-- | httemplate/edit/process/reg_code.cgi | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/httemplate/edit/process/reg_code.cgi b/httemplate/edit/process/reg_code.cgi index 581ede893..4658257f3 100644 --- a/httemplate/edit/process/reg_code.cgi +++ b/httemplate/edit/process/reg_code.cgi @@ -22,11 +22,14 @@ my @pkgparts = $error ||= $agent->generate_reg_codes($num, \@pkgparts); -unless ( ref($error) ) { %><%= +unless ( ref($error) ) { + $cgi->param('error'. $error ); +%><%= $cgi->redirect(popurl(3). "edit/reg_code.cgi?". $cgi->query_string ) %><% } else { %> <%= header("$num registration codes generated for ". $agent->agent, menubar( + 'Main menu' => popurl(3), 'View all agents' => popurl(3). 'browse/agent.cgi', ) ) %> |