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

Clean up

db4
Slava Pestov 2009-03-04 21:15:16 -06:00
parent d577a846d5
commit 039f44baa3
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/pango/layouts/layouts.factor
View File

@ -74,9 +74,12 @@ SYMBOL: dpi
#! strings #! strings
swap -1 pango_layout_set_text ; swap -1 pango_layout_set_text ;
: set-layout-resolution ( layout -- )
pango_layout_get_context dpi get pango_cairo_context_set_resolution ;
: <PangoLayout> ( text font -- layout ) : <PangoLayout> ( text font -- layout )
dummy-cairo pango_cairo_create_layout |g_object_unref dummy-cairo pango_cairo_create_layout |g_object_unref
[ pango_layout_get_context dpi get pango_cairo_context_set_resolution ] keep [ set-layout-resolution ] keep
[ set-layout-font ] keep [ set-layout-font ] keep
[ set-layout-text ] keep ; [ set-layout-text ] keep ;