From c92dee798c9145de1164ef3e534b80aadf84db27 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 5 Apr 2001 22:29:28 +0000 Subject: - fix getting result of fsedit::hds - cleanup --- perl-install/standalone/drakboot | 24 +----------------------- 1 file changed, 1 insertion(+), 23 deletions(-) (limited to 'perl-install/standalone/drakboot') diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index ca0db951c..4aee3c2cd 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -24,34 +24,12 @@ my $in = interactive->vnew('su'); require 'bootlook.pm' if ref($in) =~ /gtk/; -if (!$::isEmbedded) { - my %l = ( - arch() !~ /sparc|alpha/ ? ( - _("Configure LILO/GRUB") => '', - _("Create a boot floppy") => ['/usr/X11R6/bin/drakfloppy'], - ) : (), - _("Format floppy") => [ '/usr/bin/kfloppy', '/usr/bin/gfloppy' ], - ); - - while (my ($k, $v) = each %l) { - $v or next; - foreach (@$v) { - -x $_ and $l{$k} = $_, last; - } - -x $l{$k} or delete $l{$k}; - } - - if ($ENV{DISPLAY} && c::Xtest($ENV{DISPLAY})) { - my $cmd = $l{$in->ask_from_list(_("Choice"), _("What do you want to do?"), [ keys %l ])}; - exec $cmd if $cmd; - } -} my $bootloader = bootloader::read('', '/etc/lilo.conf'); local ($_) = `detectloader`; $bootloader->{methods} = { lilo => 1, grub => !!/grub/i }; -my $hds = catch_cdie { fsedit::hds([ detect_devices::hds() ], {}) } sub { 1 }; +my ($hds) = catch_cdie { fsedit::hds([ detect_devices::hds() ], {}) } sub { 1 }; my $fstab = [ fsedit::get_fstab(@$hds) ]; fs::get_mntpoints_from_fstab($fstab); -- cgit v1.2.1