From 98f2bb47f4163b14c873cea32d5a2eb087c846d7 Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sat, 16 Dec 2000 12:32:05 +0000
Subject: [PATCH] hrm

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@206 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/core.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/core.pl b/src/core.pl
index 9e4add7..d2027aa 100644
--- a/src/core.pl
+++ b/src/core.pl
@@ -85,7 +85,7 @@ sub doWarn {
 	&WARN("PERL: $_");
     }
 
-    $SIG{__WARN__} = 'doWarn';
+    $SIG{__WARN__} = 'doWarn';	# ???
 }
 
 # Usage: &IsParam($param);
@@ -228,6 +228,8 @@ sub startup {
 
 sub shutdown {
     # reverse order of &setup().
+    &DEBUG("shutdown called.");
+
     &closeDB();
     &closeSHM($shm);	# aswell. TODO: use this in &doExit?
     &closeLog();
-- 
2.39.5