$msg =~ s/\n/<br>/g;
$self->header;
-
- print qq|
- <body>
-
- <h2 class=error>Error!</h2>
-
- <p><b>$msg</b>
-
- </body>
- </html>
- |;
+ $self->show_generic_error($msg);
die "Error: $msg\n";
--- /dev/null
+<body>
+ <table width=100%>
+ <tr>
+ <th class=listtop><TMPL_VAR NAME=title DEFAULT="Error!"></th>
+ </tr>
+ <tr height="5"></tr>
+
+ <tr><td><TMPL_VAR NAME=label_error></td></tr>
+ </table>
+
+ <TMPL_VAR NAME=DEBUG>
+
+</body>
+</html>
--- /dev/null
+<body>
+ <table width=100%>
+ <tr>
+ <th class=listtop><TMPL_VAR NAME=title DEFAULT="Fehler!"></th>
+ </tr>
+ <tr height="5"></tr>
+
+ <tr><td><TMPL_VAR NAME=label_error></td></tr>
+ </table>
+
+ <TMPL_VAR NAME=DEBUG>
+
+</body>
+</html>