irc.messages: Remove nickname/channel distiction

[factor.git] / extra / irc / client / client.factor

diff --git a/extra/irc/client/client.factor b/extra/irc/client/client.factor
index 575c26972f39c8ec9661fa2b2a371d702fd9882a..7d4c4977bb7f1bc3d4fed15261153dbfe2d80230 100644 (file)
--- a/extra/irc/client/client.factor
+++ b/extra/irc/client/client.factor
@@ -183,7 +183,7 @@ GENERIC: forward-name ( irc-message -- name )
 M: join forward-name ( join -- name ) trailing>> ;
 M: part forward-name ( part -- name ) channel>> ;
 M: kick forward-name ( kick -- name ) channel>> ;
-M: mode forward-name ( mode -- name ) channel>> ;
+M: mode forward-name ( mode -- name ) name>> ;
 M: privmsg forward-name ( privmsg -- name )
     dup name>> me? [ irc-message-sender ] [ name>> ] if ;