summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_gtk.pm6
-rw-r--r--perl-install/install_steps_gtk.pm2
2 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index b1cf13aeb..7bc3e725a 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -197,10 +197,12 @@ sub create_logo_window {
}
#------------------------------------------------------------------------------
-sub init_gtk() {
+sub init_gtk {
+ my ($o) = @_;
+
symlink("/tmp/stage2/etc/$_", "/etc/$_") foreach qw(gtk-2.0 pango fonts);
- if (!listlength(cat_('/proc/fb'))) {
+ if ($o->{vga16}) {
#- inactivate antialias in VGA16 because it makes fonts look worse
output('/tmp/fonts.conf',
q(<fontconfig>
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 9279e498c..77f4b1829 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -135,7 +135,7 @@ sub new($$) {
}
OK:
$ENV{DISPLAY} = $wanted_DISPLAY;
- install_gtk::init_gtk();
+ install_gtk::init_gtk($o);
install_gtk::init_sizes();
install_gtk::install_theme($o);
install_gtk::create_logo_window($o);