From c19d700d0608cba8d8d208238846b94505612c29 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 23 Feb 2000 11:16:10 +0000 Subject: no_comment --- perl-install/install2.pm | 4 +++- perl-install/install_steps_gtk.pm | 2 +- perl-install/share/list.alpha | 2 ++ 3 files changed, 6 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 1be42e390..5a43da7c3 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -483,7 +483,9 @@ sub exitInstall { $o->exitInstall(getNextStep() eq "exitInstall") } #-###################################################################################### sub main { $SIG{__DIE__} = sub { chomp(my $err = $_[0]); log::l("warning: $err") }; - $SIG{SEGV} = sub { my $msg = "Seems like memory is missing as the install crashes"; print "$msg\n"; log::l($msg) }; + $SIG{SEGV} = sub { my $msg = "Seems like memory is missing as the install crashes"; print "$msg\n"; log::l($msg); + install_steps_auto_install::errorInStep(); + }; $::beginner = $::expert = $::g_auto_install = 0; diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 9462477fc..84bb2f057 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -193,7 +193,7 @@ sub new($$) { 0; }; my @servers = qw(FBDev VGA16); #-) - @servers = qw(3DLabs) if arch() eq "alpha"; + @servers = qw(SVGA 3DLabs TGA) if arch() eq "alpha"; @servers = qw(Mach64) if arch() =~ /^sparc/; foreach (@servers) { diff --git a/perl-install/share/list.alpha b/perl-install/share/list.alpha index efabaecbb..ba7f3dac2 100644 --- a/perl-install/share/list.alpha +++ b/perl-install/share/list.alpha @@ -1,2 +1,4 @@ /usr/X11R6/bin/XF86_3DLabs +/usr/X11R6/bin/XF86_SVGA +/usr/X11R6/bin/XF86_TGA /usr/X11R6/bin/xmodmap -- cgit v1.2.1