BSE::Template->show_page('interest/confirm', $cfg, \%acts);
sub error_page {
- my ($id, $error, $template) = @_;
+ my ($id, $msg, $template) = @_;
- $error = $cfg->entry(messages=>$id, $error) if $id;
- $template ||= 'error';
+ $msg = $cfg->entry(messages=>$id, $msg) if $id;
+ $template ||= 'interest/error';
my %acts;
%acts =
(
BSE::Util::Tags->basic(\%acts, $cgi, $cfg),
- error => sub { CGI::escapeHTML($error) },
+ msg => sub { CGI::escapeHTML($msg) },
);
BSE::Template->show_page($template, $cfg, \%acts);
exit;
<table width="350">
<tr>
<th colspan="2" align="center">
- <p><font face="Verdana, Arial, Helvetica, sans-serif" size="3"><b><:message:></b></font></p>
+ <p><font face="Verdana, Arial, Helvetica, sans-serif" size="3"><b><:msg:></b></font></p>
</th>
</tr>
<tr>
--- /dev/null
+<:wrap base.tmpl:>
+<div align=center>
+ <table width="350">
+ <tr>
+ <th colspan="2" align="center">
+ <p><font face="Verdana, Arial, Helvetica, sans-serif" size="3"><b>Error</b></font></p>
+ </th>
+ </tr>
+ <tr>
+ <td colspan="2">
+ <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2">There was
+ an error when registering your interest:</font></p>
+ <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><:msg:></font></p>
+ </td>
+ </tr>
+ </table>
+</div>
\ No newline at end of file