UI cleanup: make some ui.gadgets words private, give labels a virtual slot instead...

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

diff --git a/extra/lcd/lcd.factor b/extra/lcd/lcd.factor
index 8123576f5e9524d0031b21b59b30cccaae47f64e..9f86d23eea3b6f166fe6c6667924aeadb02dbc3b 100755 (executable)
--- a/extra/lcd/lcd.factor
+++ b/extra/lcd/lcd.factor
@@ -25,7 +25,7 @@ IN: lcd
 
 : <time-display> ( timestamp -- gadget )
     [ hh:mm:ss lcd ] <filter> <label-control>
-    "99:99:99" lcd over set-label-string
+    "99:99:99" lcd >>string
     monospace-font >>font ;
 
 : time-window ( -- )