From a671ffca20c1a36e5e2c3929f120b4ac65e139e2 Mon Sep 17 00:00:00 2001
From: Elizabeth Mattijsen <liz@raku.rocks>
Date: Tue, 1 Jul 2025 19:28:35 +0200
Subject: [PATCH] Make Whateverable install again

The conflict was in the Message shortcut: changed that to IRC-Message
to avoid the conflict.  Still not sure how that conflict comes about
but at least Whateverable works out of the box again.
---
 lib/Whateverable.pm6 | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/lib/Whateverable.pm6 b/lib/Whateverable.pm6
index 8f7c20a..6fddb97 100644
--- a/lib/Whateverable.pm6
+++ b/lib/Whateverable.pm6
@@ -33,7 +33,7 @@ use Whateverable::Heartbeat;
 use Whateverable::Messages;
 use Whateverable::Processing;
 
-constant Message = IRC::Client::Message;
+constant IRC-Message = IRC::Client::Message;
 
 unit role Whateverable does IRC::Client::Plugin;
 
@@ -76,29 +76,29 @@ method TWEAK {
 }
 
 #↓ STDIN reset
-multi method irc-to-me(Message $msg where .text ~~
+multi method irc-to-me(IRC-Message $msg where .text ~~
                        #↓ Matches only one space on purpose (for whitespace-only stdin)
                        /:i^ [stdin] [‘ ’|‘=’] [clear|delete|reset|unset] $/) {
     $CONFIG<stdin> = $CONFIG<default-stdin>;
     ‘STDIN is reset to the default value’
 }
 #↓ STDIN set
-multi method irc-to-me(Message $msg where .text ~~ /:i^ [stdin] [‘ ’|‘=’] $<stdin>=.* $/) {
+multi method irc-to-me(IRC-Message $msg where .text ~~ /:i^ [stdin] [‘ ’|‘=’] $<stdin>=.* $/) {
     my $file = process-code ~$<stdin>, $msg;
     $CONFIG<stdin> = $file.slurp;
     unlink $file;
     “STDIN is set to «{shorten $CONFIG<stdin>, 200}»” # TODO is 200 a good limit
 }
 #↓ Source
-multi method irc-to-me(Message $    where .text ~~ /:i^ [source|url] ‘?’? \s* $/) { $CONFIG<source> }
+multi method irc-to-me(IRC-Message $    where .text ~~ /:i^ [source|url] ‘?’? \s* $/) { $CONFIG<source> }
 #↓ Wiki
-multi method irc-to-me(Message $    where .text ~~ /:i^ wiki ‘?’? \s* $/) { self.get-wiki-link }
+multi method irc-to-me(IRC-Message $    where .text ~~ /:i^ wiki ‘?’? \s* $/) { self.get-wiki-link }
 #↓ Help
-multi method irc-to-me(Message $msg where .text ~~ /:i^ [help|usage] ‘?’? \s* $/) {
+multi method irc-to-me(IRC-Message $msg where .text ~~ /:i^ [help|usage] ‘?’? \s* $/) {
     self.help($msg) ~ “ # See wiki for more examples: {self.get-wiki-link}”
 }
 #↓ Uptime
-multi method irc-to-me(Message $msg where .text ~~ /:i^ uptime \s* $/) {
+multi method irc-to-me(IRC-Message $msg where .text ~~ /:i^ uptime \s* $/) {
     use nqp;
     use Telemetry;
     (denominate now - $*INIT-INSTANT) ~ ‘, ’
@@ -121,7 +121,7 @@ sub you're-welcome is export {
     »
 }
 #| Replying to thanks
-multi method irc-to-me(Message $msg where .text ~~ /:i^ [‘thank you’|‘thanks’] \s* /) {
+multi method irc-to-me(IRC-Message $msg where .text ~~ /:i^ [‘thank you’|‘thanks’] \s* /) {
     you're-welcome.pick
 }
 #| Replying to thanks