irc: Fix problems in tests

[factor.git] / extra / irc / messages / messages-tests.factor

diff --git a/extra/irc/messages/messages-tests.factor b/extra/irc/messages/messages-tests.factor
index 74cd95c09a313c94923c64eb85592ea688aaf027..218ed92018908c7d6bf2d4d45ba2027f60bb257a 100644 (file)
--- a/extra/irc/messages/messages-tests.factor
+++ b/extra/irc/messages/messages-tests.factor
@@ -26,7 +26,8 @@ IN: irc.messages.tests
      { command "JOIN" }
      { parameters { } }
      { trailing "#factortest" }
-     { sender "someuser" } } }
+     { sender "someuser" }
+     { channel "#factortest" } } }
 [ ":someuser!n=user@some.where JOIN :#factortest"
   string>irc-message f >>timestamp ] unit-test