From 689852898c4f77f850f77f7ef5dc807b84bf6746 Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 15 Aug 2000 11:21:47 +0000
Subject: [PATCH] on_disconnect schedules ircCheck*( for 1800s

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@42 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/IRC/IrcHooks.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl
index 897bc00..085283d 100644
--- a/src/IRC/IrcHooks.pl
+++ b/src/IRC/IrcHooks.pl
@@ -218,9 +218,9 @@ sub on_disconnect {
     $nickserv = 0;
 
     &clearIRCVars();
-
     if (!$self->connect()) {
-	&WARN("not connected? help me. ircCheck() should reconnect me");
+	&WARN("not connected? help me. gonna call ircCheck() in 1800s");
+	$conn->schedule(1800, \&ircCheck(), "");
     }
 }
 
-- 
2.39.5