From 6e72e44dcfa6705a8931f7918bd617536fa380f3 Mon Sep 17 00:00:00 2001 From: Zoffix Znet Date: Tue, 6 Feb 2018 14:17:44 -0500 Subject: Ensure we don't try to serialize an Exception in $! --- lib/IRC/Client.pm6 | 1 + 1 file changed, 1 insertion(+) (limited to 'lib') diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 3658d73..7dd6e8d 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -25,6 +25,7 @@ has Channel $!socket-pipe = Channel.new; my &colored = (try require Terminal::ANSIColor) === Nil && sub (Str $s, $) { $s } || ::('Terminal::ANSIColor::EXPORT::DEFAULT::&colored'); +$! = Nil; # don't serialize any exceptions from the above submethod BUILD ( Int:D :$!debug = 0, -- cgit v1.1