From 5189f84cc6e1742ad66ff9547dac3ca97c5b7616 Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Mon, 4 Jan 2016 17:03:32 -0500
Subject: Accomodate a Rakudobug RT#127142

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

(limited to 'lib/IRC')

diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6
index 98c57ed..333cf9e 100644
--- a/lib/IRC/Client.pm6
+++ b/lib/IRC/Client.pm6
@@ -98,7 +98,8 @@ method respond (
     Str:D :$where is required,
     Str:D :$what  is required is copy,
     Str:D :$who,
-          :$when  where Dateish|Instant;
+          :$when  where Any|Dateish|Instant;
+          # TODO: remove Any: https://rt.perl.org/Ticket/Display.html?id=127142
 ) {
     $what = "$who, $what" if $who and $where ~~ /^<[#&]>/;
     my $method = $how.fc eq 'PRIVMSG'.fc ?? 'privmsg'
-- 
cgit v1.1