summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2012-12-10 04:18:23 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-11-24 21:28:35 +0100
commit45b2bb4e1c39962b9234c3b3a45d24767ef350f2 (patch)
tree000b260a958bfd57cf5638894bb7ac0592dbc9c4
parent8927e8c55ea0b659faabff90b0c9a67e3112eb0c (diff)
downloaddrakx-45b2bb4e1c39962b9234c3b3a45d24767ef350f2.tar
drakx-45b2bb4e1c39962b9234c3b3a45d24767ef350f2.tar.gz
drakx-45b2bb4e1c39962b9234c3b3a45d24767ef350f2.tar.bz2
drakx-45b2bb4e1c39962b9234c3b3a45d24767ef350f2.tar.xz
drakx-45b2bb4e1c39962b9234c3b3a45d24767ef350f2.zip
set font for Gtk+-3 system wide
we alter /.config instead of /root/.config due to bogus environment
-rw-r--r--perl-install/install/gtk.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index 714a56022..a60d6d678 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -75,10 +75,12 @@ sub load_font {
}
my $font = lang::l2pango_font($o->{locale}{lang});
- my $s = qq(gtk-font-name="$font");
+ my $s = qq(gtk-font-name = $font);
Gtk3::Rc->parse_string($s);
- mkdir("/root");
- output("/root/.gtkrc-2.0", $s);
+ mkdir_p("/.config/gtk-3.0");
+ output("/.config/gtk-3.0/settings.ini", qq([Settings]
+$s
+));
}
#------------------------------------------------------------------------------