calendar.format: make duration>human-readable more human readable

[factor.git] / extra / hello-unicode / hello-unicode.factor

diff --git a/extra/hello-unicode/hello-unicode.factor b/extra/hello-unicode/hello-unicode.factor
index cf120d4d36e6d71c1fb4f0a4e538aa8f727b5e01..fc274a70552e1251cdb9c678ed274d8da1ddb291 100644 (file)
--- a/extra/hello-unicode/hello-unicode.factor
+++ b/extra/hello-unicode/hello-unicode.factor
@@ -1,6 +1,6 @@
 ! Copyright (C) 2009 Slava Pestov.
-! See http://factorcode.org/license.txt for BSD license.
-USING: ui.gadgets.panes ui.gadgets.borders ui io io.styles ;
+! See https://factorcode.org/license.txt for BSD license.
+USING: accessors ui.gadgets.panes ui.gadgets.borders ui io io.styles ;
 IN: hello-unicode
 
 : <hello-gadget> ( -- gadget )
@@ -8,13 +8,12 @@ IN: hello-unicode
         { { font-size 24 } } [
             "Hello" print
             "Grüß dich" print
-            "здÑ\80авÑ\81Ñ\82вÑ\83йÑ\82е" print
+            "Ð\9fÑ\80ивеÑ\82" print
             "こんにちは" print
             "안녕하세요" print
             "שָׁלוֹם " print
         ] with-style
-    ] make-pane 10 <border> ;
+    ] make-pane { 10 10 } <border> ;
 
-: hello-unicode ( -- ) <hello-gadget> "გამარჯობა" open-window ;
-
-MAIN: hello-unicode
\ No newline at end of file
+MAIN-WINDOW: hello-unicode { { title "გამარჯობა" } }
+    <hello-gadget> >>gadgets ;