From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sun, 4 Feb 2001 12:23:53 +0000 (+0000)
Subject: reconnect if join fails
X-Git-Url: https://git.donarmstrong.com/?p=infobot.git;a=commitdiff_plain;h=eb7d7a6de2d989598d06db68ba98a3658f227401

reconnect if join fails


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

diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl
index 076cb82..909da29 100644
--- a/src/IRC/Irc.pl
+++ b/src/IRC/Irc.pl
@@ -350,7 +350,10 @@ sub joinchan {
     if (&validChan($chan)) {
 	&status("join: already on $chan");
     } else {
-	$conn->join($chan);
+	if (!$conn->join($chan)) {
+	    &DEBUG("join failed. trying connect!");
+	    $conn->connect();
+	}
     }
 }