summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install/gtk.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index 943b42bdc..d44214913 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -79,7 +79,9 @@ sub load_font {
my $font = lang::l2pango_font($o->{locale}{lang});
my $s = qq(gtk-font-name = $font);
- Gtk3::Rc->parse_string($s);
+ my $pl = Gtk3::CssProvider->new;
+ $pl->load_from_data("GtkWindow { font: $font }");
+ my $cx = Gtk3::StyleContext::add_provider_for_screen(Gtk3::Gdk::Screen::get_default(), $pl, Gtk3::STYLE_PROVIDER_PRIORITY_APPLICATION);
# FIXME: this should be done in /mnt too for forked app such as gurpmi{,.addmedia} (mga#67):
mkdir_p("/.config/gtk-3.0");
output("/.config/gtk-3.0/settings.ini", qq([Settings]