From dda15b0d0617c9e251d4fec51fe163cef3eab408 Mon Sep 17 00:00:00 2001 From: Bruno Deferrari Date: Wed, 9 Jul 2008 23:11:39 -0300 Subject: [PATCH] irc.client: Fix join message handling --- extra/irc/client/client.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/irc/client/client.factor b/extra/irc/client/client.factor index ffe78437a7..472805f5ae 100644 --- a/extra/irc/client/client.factor +++ b/extra/irc/client/client.factor @@ -155,7 +155,7 @@ M: privmsg handle-incoming-irc ( privmsg -- ) M: join handle-incoming-irc ( join -- ) [ [ prefix>> parse-name me? ] keep and [ irc> join-messages>> mailbox-put ] when* ] - [ dup channel>> to-listener ] + [ dup trailing>> to-listener ] bi ; M: part handle-incoming-irc ( part -- )