summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_gtk.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
-rw-r--r--perl-install/install/steps_gtk.pm13
1 files changed, 13 insertions, 0 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index 5af3e3e6f..a32a195e6 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -123,6 +123,7 @@ sub new($$) {
install::gtk::init_sizes($o);
install::gtk::install_theme($o);
install::gtk::create_steps_window($o);
+ _may_configure_framebuffer_640x480($o);
$ugtk2::grab = 1;
@@ -131,6 +132,18 @@ sub new($$) {
$o;
}
+#- if we success to start X in 640x480 using driver "vesa",
+#- we configure to use fb on installed system (to ensure splashy works)
+#- (useful on 800x480 netbooks)
+sub _may_configure_framebuffer_640x480 {
+ my ($o) = @_;
+
+ if ($::rootwidth == 640 && !$o->{allowFB}) {
+ $o->{vga} = 785;
+ $o->{allowFB} = 1;
+ }
+}
+
sub enteringStep {
my ($o, $step) = @_;