diff options
| author | Zoffix Znet <cpan@zoffix.com> | 2016-07-31 17:13:17 -0400 |
|---|---|---|
| committer | Zoffix Znet <cpan@zoffix.com> | 2016-07-31 17:13:17 -0400 |
| commit | 0bbb3c0fe6521f11f4a6d1338b48581fc4334c6a (patch) | |
| tree | 3d0d8775724cef91984d47b8b6816087c32f6da4 | |
| parent | 6edfc2405f31181c133579857b1498ff613ad479 (diff) | |
Fix issue with channels argument typecheck3.003006
| -rw-r--r-- | Changes | 9 | ||||
| -rw-r--r-- | lib/IRC/Client.pm6 | 4 |
2 files changed, 8 insertions, 5 deletions
@@ -1,11 +1,14 @@ Revision history for IRC::Client -3.003005 2016-07-30 +3.0003006 2016-07-31 + - Fix issue with giving multiple values to channels + +3.0003005 2016-07-30 - Fix Privmsg message object match in signature regex - Fix warnings in output -3.003004 2016-07-30 +3.0003004 2016-07-30 - Fix precompilation bug for Terminal::ANSIColor loading (MasterDuke) -3.003003 2016-07-29 +3.0003003 2016-07-29 - Completed "rewrite" API redesign diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 3f056ff..4ec67a5 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -44,7 +44,7 @@ submethod BUILD ( Str:D :$username = 'Perl6IRC', Str:D :$userhost = 'localhost', Str:D :$userreal = 'Perl6 IRC Client', - Str:D :$channels = ['#perl6'], + :$channels = ('#perl6',), ) { @!filters = @$filters; @!plugins = @$plugins; @@ -59,7 +59,7 @@ submethod BUILD ( my $s = IRC::Client::Server.new( :socket(Nil), :$label, - :channels[ |($conf<channels> // %all-conf<channels>) ], + :channels( @($conf<channels> // %all-conf<channels>) ), :nick[ |($conf<nick> // %all-conf<nick>) ], |%( <host password port username userhost userreal> |