Update code for model class renamings

[factor.git] / extra / lcd / lcd.factor

diff --git a/extra/lcd/lcd.factor b/extra/lcd/lcd.factor
index 9f86d23eea3b6f166fe6c6667924aeadb02dbc3b..b7a3235ea8148cd76c8af3191683f0ca970a129b 100755 (executable)
--- a/extra/lcd/lcd.factor
+++ b/extra/lcd/lcd.factor
@@ -1,7 +1,7 @@
 ! Copyright (C) 2008 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors sequences kernel math io calendar grouping
-calendar.format calendar.model arrays models models.filter
+calendar.format calendar.model arrays models models.arrow
 namespaces ui.gadgets ui.gadgets.labels ui.gadgets.theme ui ;
 IN: lcd
 
@@ -24,7 +24,7 @@ IN: lcd
     3array [ pad-00 ] map ":" join ;
 
 : <time-display> ( timestamp -- gadget )
-    [ hh:mm:ss lcd ] <filter> <label-control>
+    [ hh:mm:ss lcd ] <arrow> <label-control>
     "99:99:99" lcd >>string
     monospace-font >>font ;