steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

changed "cairo.pango.gadgets" run to use Japanese

db4
Matthew Willis 2008-05-24 20:03:31 -07:00
parent c64de056fb
commit 0c8d145378
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/cairo/pango/gadgets/gadgets.factor
View File

@ -12,8 +12,8 @@ IN: cairo.pango.gadgets
USING: prettyprint sequences ui.gadgets.panes ; USING: prettyprint sequences ui.gadgets.panes ;
: hello-pango ( -- ) : hello-pango ( -- )
50 [ 6 + ] map [ 50 [ 6 + ] map [
"Sans Bold " swap unparse append "Sans " swap unparse append
[ layout-font "Hello, Pango!" layout-text ] curry [ layout-font "今日は、 Pango!" layout-text ] curry
<pango-gadget> gadget. <pango-gadget> gadget.
] each ; ] each ;