--- cf.schmorp.de/Deliantra-Client/Client.xs 2006/04/17 09:33:11 1.45 +++ cf.schmorp.de/Deliantra-Client/Client.xs 2006/04/17 19:20:59 1.46 @@ -49,7 +49,14 @@ * reasonably well with bitstream vera */ PangoFontDescription *font = pango_context_get_font_description (context); - pango_font_description_set_absolute_size (font, self->base_height * (PANGO_SCALE * 8 / 10)); + + int height = self->base_height * (PANGO_SCALE * 8 / 10); + + if (pango_font_description_get_size (font) != height) + { + pango_font_description_set_absolute_size (font, height); + pango_layout_context_changed (self->pl); + } } static void @@ -393,6 +400,14 @@ pango_layout_set_markup (self->pl, text, textlen); } +SV * +get_text (CFClient::Layout self) + CODE: + RETVAL = newSVpv (pango_layout_get_text (self), 0); + SvUTF8_on (RETVAL); + OUTPUT: + RETVAL + void set_height (CFClient::Layout self, int base_height) CODE: