Fix load error in irc.ui

db4
Slava Pestov 2008-11-24 00:57:31 -06:00
parent 6027c02fac
commit 10238715f0
2 changed files with 3 additions and 3 deletions

View File

@ -5,8 +5,6 @@ USING: kernel vocabs.loader sequences strings splitting words irc.messages ;
IN: irc.ui.commandparser
"irc.ui.commands" require
: command ( string string -- string command )
[ "say" ] when-empty
dup "irc.ui.commands" lookup

View File

@ -9,7 +9,7 @@ USING: accessors kernel threads combinators concurrency.mailboxes
ui.gadgets.tabs ui.gadgets.grids ui.gadgets.packs ui.gadgets.labels
io io.styles namespaces calendar calendar.format models continuations
irc.client irc.client.private irc.messages
irc.ui.commandparser irc.ui.load ;
irc.ui.commandparser irc.ui.load vocabs.loader ;
RENAME: join sequences => sjoin
@ -245,3 +245,5 @@ M: irc-tab pref-dim*
: main-run ( -- ) run-ircui ;
MAIN: main-run
"irc.ui.commands" require