See messages that are sent to other users

Using $.NEXT is not enough to make IRC::Client redispatch to another
method. The plugin system seems a bit fragile, but maybe it's because
I'm not using it properly. Anyway, this should now catch more
messages, perhaps with a few (mostly irrelevant) exceptions.

xbin/Tellable.p6

@@ -57,7 +57,7 @@ sub normalize-weirdly($nick) {
 sub guest-like($nick) { so $nick ~~ /^Guest\d/ }
 
 #| listen for messages and deliver stuff
-multi method irc-privmsg-channel($msg) {
+multi method irc-privmsg($msg where IRC::Client::Message::Privmsg::Channel) {
     return $.NEXT if guest-like $msg.nick;
     my $normalized = normalize-weirdly $msg.nick;
     $db-seen.read-write: {

xt/tellable.t

@@ -238,6 +238,11 @@ $jnthn.send: where => ‘#whateverable_tellable6’, text => ‘hello’;
 $t.test(‘autosend doesn't mistrigger (join)’,
         ‘jnthn: hello’,);
 
+$t.test(‘messages to other users are seen’,
+        “.seen {$t.our-nick}”,
+        /^ <me($t)>‘, I saw ’<me($t)>‘ 2’\S+‘Z in #whateverable_tellable6: <’<me($t)>‘> jnthn: hello’ $/
+       );
+
 $t.test(‘.seen is still working’,
         ‘.seen jnthn’,
         /^ <me($t)>‘, I saw jnthn 2’\S+‘Z in #whateverable_tellable6: <jnthn> hello’ $/