Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Die_log tries to log too.

Browse Source
This commit is contained in:
Chris 2012-08-09 19:55:08 +01:00
parent 8fc097e640
commit 0311d0f6e4
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Logger.pm
View File

@ -323,6 +323,8 @@ sub die_log {
print $logfile scalar(localtime)," [$$:$ip]: $message\n" print $logfile scalar(localtime)," [$$:$ip]: $message\n"
if($logfile); if($logfile);
$self -> log("fatal", 0, $ip, $message);
die "[$$:$ip]: $message\n"; die "[$$:$ip]: $message\n";
} }