From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Fri, 1 Sep 2000 14:19:33 +0000 (+0000)
Subject: added disconnect and connect stats, just debug info for now
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c2a2a2916f2dcf80368ec9a5fc5509a7059541cc;p=infobot.git

added disconnect and connect stats, just debug info for now


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@67 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/IRC/IrcHooks.pl b/blootbot/src/IRC/IrcHooks.pl
index bd6fa69..588594e 100644
--- a/blootbot/src/IRC/IrcHooks.pl
+++ b/blootbot/src/IRC/IrcHooks.pl
@@ -215,7 +215,9 @@ sub on_disconnect {
     my $what = ($event->args)[0];
 
     &status("disconnect from $from ($what).");
-    $ircstats{'DisconnectReason'} = $what;
+    $ircstats{'DisconnectTime'}		= time();
+    $ircstats{'DisconnectReason'}	= $what;
+    $ircstats{'DisconnectCount'}++;
 
     # clear any variables on reconnection.
     $nickserv = 0;