From: short <>
Date: Wed, 5 Jan 2005 02:49:19 +0000 (+0000)
Subject: Log web &fatal info to http error logs.
X-Git-Url: https://git.jankratochvil.net/?p=MyWeb.git;a=commitdiff_plain;h=302a5dd3ae3231811ca76abee9d7f6c19a803fec

Log web &fatal info to http error logs.
---

diff --git a/Web.pm b/Web.pm
index cf02915..c6a0452 100644
--- a/Web.pm
+++ b/Web.pm
@@ -289,6 +289,7 @@ sub fatal (;$)
 my($msg)=@_;
 
 	$msg="UNKNOWN" if !$msg;
+	cluck "FATAL: $msg";
 
 	$W->{"indexme"}=0;	# For the case no heading was sent yet.
 	$W->{"heading_done"}=0;	# for the case of already sent {"header_only"}==1