irc.messages: oops

db4
Bruno Deferrari 2008-09-04 01:28:37 -03:00
parent f936f5f54f
commit 7f588bbb84
1 changed files with 1 additions and 1 deletions

View File

@ -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 ;