Tkx::font_configure('TkDefaultFont', -size => int(Tkx::font_configure('TkDefaultFont', -size) * 1.5));