aboutsummaryrefslogtreecommitdiff
path: root/lib/IRC/Client.pm6
diff options
context:
space:
mode:
Diffstat (limited to 'lib/IRC/Client.pm6')
-rw-r--r--lib/IRC/Client.pm66
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6
index 3291474..3f056ff 100644
--- a/lib/IRC/Client.pm6
+++ b/lib/IRC/Client.pm6
@@ -382,9 +382,9 @@ sub debug-print (Str() $str, :$in, :$out, :$sys, :$server) {
$pref++; $cmd++;
}
@bits[$pref] = colored @bits[$pref], 'bold magenta';
- @bits[$cmd] = @bits[$cmd] ~~ /^ <[0..9]>**3 $/
- ?? colored(@bits[$cmd], 'bold red')
- !! colored(@bits[$cmd], 'bold yellow');
+ @bits[$cmd] = (@bits[$cmd]//'') ~~ /^ <[0..9]>**3 $/
+ ?? colored(@bits[$cmd]//'', 'bold red')
+ !! colored(@bits[$cmd]//'', 'bold yellow');
put colored('▬▬▶ ', 'bold blue' ) ~ $server-str ~ @bits.join: ' ';
}
elsif $out {