From 617c1d4c2a3ff0198f3c4849b60dc3efd1d90278 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 16 Apr 2001 10:03:11 +0000 Subject: (g_auto_install): do not take 'mkbootdisk' --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index ff37c743c..43ca44e37 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -608,7 +608,7 @@ sub g_auto_install { my @fields = qw(mntpoint type size); $o->{partitions} = [ map { my %l; @l{@fields} = @$_{@fields}; \%l } grep { $_->{mntpoint} } @{$::o->{fstab}} ]; - exists $::o->{$_} and $o->{$_} = $::o->{$_} foreach qw(lang authentication printer mouse wacom netc timezone superuser intf keyboard mkbootdisk users partitioning isUpgrade manualFstab nomouseprobe crypto security netcnx useSupermount autoExitInstall); #- TODO modules bootloader + exists $::o->{$_} and $o->{$_} = $::o->{$_} foreach qw(lang authentication printer mouse wacom netc timezone superuser intf keyboard users partitioning isUpgrade manualFstab nomouseprobe crypto security netcnx useSupermount autoExitInstall); #- TODO modules bootloader if (my $card = $::o->{X}{card}) { $o->{X}{$_} = $::o->{X}{$_} foreach qw(default_depth resolution_wanted); -- cgit v1.2.1