summaryrefslogtreecommitdiffstats
path: root/perl-install/install/gtk.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-10 03:14:08 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-10 03:14:08 +0000
commitb26f6d428ce4306a1f052e0afd4188f2a2dc24d7 (patch)
tree2eb42ff40ed5a7f8aca3040e4ccacf862422a64e /perl-install/install/gtk.pm
parent11a86e8a32cfcbe8866305e25f031fe298b6cf17 (diff)
downloaddrakx-backup-do-not-use-b26f6d428ce4306a1f052e0afd4188f2a2dc24d7.tar
drakx-backup-do-not-use-b26f6d428ce4306a1f052e0afd4188f2a2dc24d7.tar.gz
drakx-backup-do-not-use-b26f6d428ce4306a1f052e0afd4188f2a2dc24d7.tar.bz2
drakx-backup-do-not-use-b26f6d428ce4306a1f052e0afd4188f2a2dc24d7.tar.xz
drakx-backup-do-not-use-b26f6d428ce4306a1f052e0afd4188f2a2dc24d7.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.pm7
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);
}
#------------------------------------------------------------------------------