From 54a40cf7adffd4eff2a7084e710f01d90cee17aa Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 30 May 2005 02:57:20 +0000 Subject: load drivers for newly added devices so that they work out of the box on first boot after card plugging for the following categorys: AGP ATA_STORAGE DVB SATA_STORAGE SCSI_CONTROLLER TV --- perl-install/standalone/service_harddrake | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index 643aaa62a..77616c0de 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -140,9 +140,12 @@ foreach my $hw_class (@harddrake::data::tree) { $modules_conf->write; next; } elsif (member($Ident, qw(AGP ATA_STORAGE DVB SATA_STORAGE SCSI_CONTROLLER TV))) { - $modules_conf->remove_module(difference2([ uniq(map { $_->{driver} } values %$oldconfig) ], [ uniq(map { $_->{driver} } values %ID) ])); + my @old_drivers = uniq(map { $_->{driver} } values %$oldconfig); + my @new_drivers = uniq(map { $_->{driver} } values %ID); + $modules_conf->remove_module(difference2(\@old_drivers, \@new_drivers)); # add agpgart and the like modules to modprobe.preload if needed: $modules_conf->write; + modules::load(difference2(\@new_drivers, \@old_drivers)); next; } elsif ($Ident eq "PCMCIA_CONTROLLER") { harddrake::autoconf::pcmcia(keys %ID ? first(values(%ID))->{driver} : ''); -- cgit v1.2.1