From 7f588bbb8481a51eb6629032395798c4ace45702 Mon Sep 17 00:00:00 2001 From: Bruno Deferrari Date: Thu, 4 Sep 2008 01:28:37 -0300 Subject: [PATCH] irc.messages: oops --- extra/irc/messages/messages.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/irc/messages/messages.factor b/extra/irc/messages/messages.factor index e68cf12d2d..3a9654dd6f 100755 --- a/extra/irc/messages/messages.factor +++ b/extra/irc/messages/messages.factor @@ -126,5 +126,5 @@ M: sender-in-prefix irc-message-sender ( sender-in-prefix -- sender ) [ drop unhandled ] } case [ [ tuple-slots ] [ parameters>> ] bi append ] dip - [ all-slots over [ length ] bi@ min head >quotation ] keep + [ all-slots over [ length ] bi@ min head ] keep prefix >tuple ;