# HTML generating routines
#
# Author: Patrick Canterino <patshaping@gmx.net>
-# Last modified: 2004-03-04
+# Last modified: 2004-11-13
#
use strict;
@EXPORT = qw(error_template
error
- abort
- error_in_use);
+ abort);
my $tpl_error;
# Format an error message
#
# Params: 1. Error message
-# 2. Virtual path to which a link should be displayed (optional)
+# 2. Display a link to this path at the bottom of the page (optional)
# 3. Hash reference: Template variables (optional)
#
# Return: Formatted message (Scalar Reference)
# ^^^^^
#
# Params: 1. Error message
-# 2. Hash reference: Template variables (optional)
+# 2. Display a link to this path at the bottom of the page (optional)
+# 3. Hash reference: Template variables (optional)
-sub abort($;$)
+sub abort($;$$)
{
- my $output = error(shift,undef,shift);
+ my $output = error(shift,shift,shift);
print $$output;
exit;
}