diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-12-10 03:14:08 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-12-10 03:14:08 +0000 |
commit | 5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab (patch) | |
tree | 2eb42ff40ed5a7f8aca3040e4ccacf862422a64e /perl-install/install/gtk.pm | |
parent | 55c49b24ae244338993146137120f48fff8cff6c (diff) | |
download | drakx-5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab.tar drakx-5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab.tar.gz drakx-5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab.tar.bz2 drakx-5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab.tar.xz drakx-5d3d6c1a01eb33b5a35fbc13657d6e9d9b5f9aab.zip |
(load_font) set font familly & size system wide
thus fixing font size in gurpmi & release notes (mga#67)
Diffstat (limited to 'perl-install/install/gtk.pm')
-rw-r--r-- | perl-install/install/gtk.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm index a447e215d..794c38f6e 100644 --- a/perl-install/install/gtk.pm +++ b/perl-install/install/gtk.pm @@ -74,14 +74,17 @@ sub load_font { $::WizardWindow->move($::rootwidth - $width - $x, $y); } - Gtk2::Rc->parse_string(q( + my $s = q( style "default-font" { font_name = ") . lang::l2pango_font($o->{locale}{lang}) . q(" } widget "*" style "default-font" -)); +); + Gtk2::Rc->parse_string($s); + mkdir("/root"); + output("/root/.gtkrc-2.0", $s); } #------------------------------------------------------------------------------ |