Update code for model class renamings

[factor.git] / basis / ui / tools / listener / listener.factor

diff --git a/basis/ui/tools/listener/listener.factor b/basis/ui/tools/listener/listener.factor
index f5974686b6a971f968d39b0d72daee05e91965b5..ca41fa5408e02f22b9b22119856fd846f8f5cb6b 100644 (file)
--- a/basis/ui/tools/listener/listener.factor
+++ b/basis/ui/tools/listener/listener.factor
@@ -4,7 +4,7 @@ USING: accessors arrays assocs calendar combinators locals
 colors.constants combinators.short-circuit compiler.units
 concurrency.flags concurrency.mailboxes continuations destructors
 documents documents.elements fry hashtables help help.markup io
-io.styles kernel lexer listener math models models.delay models.filter
+io.styles kernel lexer listener math models models.delay models.arrow
 namespaces parser prettyprint quotations sequences strings threads
 tools.vocabs vocabs vocabs.loader vocabs.parser words ui ui.commands
 ui.pens.solid ui.gadgets ui.gadgets.glass ui.gadgets.buttons ui.gadgets.editors
@@ -63,7 +63,7 @@ M: char-completion (word-at-caret)
 : <word-model> ( interactor -- model )
     [ token-model>> 1/3 seconds <delay> ]
     [ '[ _ word-at-caret ] ] bi
-    <filter> ;
+    <arrow> ;
 
 : <interactor> ( -- gadget )
     interactor new-editor