From 7a17edf5807b585698a219aaf551f1393139c001 Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Thu, 9 Jun 2016 21:53:21 -0400
Subject: Fix multi-channel join for non-spec-conforming servers

---
 lib/IRC/Client.pm6 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6
index cacd7c1..6803203 100644
--- a/lib/IRC/Client.pm6
+++ b/lib/IRC/Client.pm6
@@ -80,7 +80,7 @@ method !handle-event ($e) {
     given $e.command {
         when '001'  {
             %!servers{ $e.server }<nick> = $e.args[0];
-            self!ssay: "JOIN @.channels[]", :server($e.server);
+            self!ssay: "JOIN $_", :server($e.server) for @.channels;
         }
         when 'PING' { $e.reply }
         when 'JOIN' {
-- 
cgit v1.1