assocs: Add of and ?of. Change all the things at once! Fixes #701.

[factor.git] / extra / irc / client / internals / internals-tests.factor

diff --git a/extra/irc/client/internals/internals-tests.factor b/extra/irc/client/internals/internals-tests.factor
index be1e94cd70749bb0ed7e871cf3cc15489f42f0ed..43c9a6ad763c473ee95866cbe46c8e31dd365c80 100644 (file)
--- a/extra/irc/client/internals/internals-tests.factor
+++ b/extra/irc/client/internals/internals-tests.factor
@@ -223,7 +223,7 @@ M: mb-writer dispose drop ;
       "#factortest" <irc-channel-chat> [ %add-named-chat ] keep
       "ircuser" over join-participant
       ":ircserver.net MODE #factortest +o ircuser" %push-line
-      participants>> "ircuser" swap at
+      participants>> "ircuser" of
   ] unit-test
 ] spawning-irc