Fix for returns error message always displaying

This commit is contained in:
rangi 2003-08-04 21:47:23 +00:00
parent e6a4f80040
commit 80ab9dee1d
2 changed files with 4 additions and 0 deletions

View File

@ -255,7 +255,9 @@ foreach my $code (keys %$messages) {
} else {
die "Unknown error code $code"; # XXX
}
if (%err){
push (@errmsgloop, \%err);
}
last if $exit_required_p;
}
$template->param(errmsgloop => \@errmsgloop);

View File

@ -126,6 +126,7 @@ Phone: <TMPL_VAR Name="borphone">
</td>
<td valign=top align=left>
</TMPL_IF>
<TMPL_IF NAME="errmsgloop">
<table border=1 cellpadding=5 cellspacing=0 bgcolor='#dddddd'>
<tr><th background="<TMPL_VAR name="themelang">/images/background-mem.gif"><font>Messages</font></th></tr>
<tr><td>
@ -150,6 +151,7 @@ Phone: <TMPL_VAR Name="borphone">
<BR>
</TMPL_LOOP>
</td></tr></table>
</TMPL_IF>
</td>
</tr>
<TMPL_IF Name="returned">