diff options
-rw-r--r-- | Changes | 3 | ||||
-rw-r--r-- | META6.json | 2 | ||||
-rw-r--r-- | lib/IRC/Client.pm6 | 2 |
3 files changed, 5 insertions, 2 deletions
@@ -1,5 +1,8 @@ Revision history for IRC::Client +3.006002 2016-08-08 + - Emit irc-started before any connection is made + 3.006001 2016-08-07 - Add `:alias` feature (#22) @@ -1,7 +1,7 @@ { "perl" : "6.c", "name" : "IRC::Client", - "version" : "3.006001", + "version" : "3.006002", "description" : "Extendable Internet Relay Chat client", "depends" : [ ], diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 34e6f54..3879ac9 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -119,8 +119,8 @@ method run { CATCH { default { warn $_; warn .backtrace } } } - self!connect-socket: $_ for %!servers.values; .irc-started for self!plugs-that-can('irc-started'); + self!connect-socket: $_ for %!servers.values; loop { my $s = $!socket-pipe.receive; self!connect-socket: $s unless $s.has-quit; |