diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2007-12-02 07:02:43 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2007-12-02 07:02:43 +0000 |
| commit | 06ca688c86ff96d96fd4346f7f20efb60ab769cc (patch) | |
| tree | 29dd440524c05f2d75faf9fea79bb430ca8f1f18 /lib/Tools.pm | |
| parent | 1fa6b8846c9dee8bf249bcb12f425d4c712a412f (diff) | |
| download | xxv-06ca688c86ff96d96fd4346f7f20efb60ab769cc.tar.gz xxv-06ca688c86ff96d96fd4346f7f20efb60ab769cc.tar.bz2 | |
* Fix: display 'panic' message
* Fix: Warn if requested modul is'nt loaded
* HTTPD: Show 'Internal Server Error' if requested modul is'nt loaded
Diffstat (limited to 'lib/Tools.pm')
| -rw-r--r-- | lib/Tools.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/Tools.pm b/lib/Tools.pm index 155de0a..97a483d 100644 --- a/lib/Tools.pm +++ b/lib/Tools.pm @@ -132,7 +132,7 @@ sub lg { sub debug { # ------------------ my $msg = shift; - &_msg(250,$msg, 3); + &_msg(250,$msg, 4); return undef; } @@ -144,7 +144,7 @@ sub event { my ($package, $filename, $line, $subroutine) = caller(1); &{$LOGCALLB}($module, $subroutine, $msg); - &_msg(270,$msg, 2); + &_msg(270,$msg, 3); return undef; } @@ -153,7 +153,7 @@ sub error { # ------------------ my $msg = shift; - &_msg(501,$msg, 1); + &_msg(501,$msg, 2); return undef; } @@ -163,7 +163,7 @@ sub panic { # ------------------ my $msg = shift; - &_msg(550,$msg, 0); + &_msg(550,$msg, 1); return undef; } |