From 45b2bb4e1c39962b9234c3b3a45d24767ef350f2 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 10 Dec 2012 04:18:23 +0100
Subject: set font for Gtk+-3 system wide

we alter /.config instead of /root/.config due to bogus environment
---
 perl-install/install/gtk.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'perl-install/install/gtk.pm')

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
+));
 }
 
 #------------------------------------------------------------------------------
-- 
cgit v1.2.1