From 8bbfff60b0abe467f5ec1e95facdfbfd86e1c9c4 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 13 Jan 2004 12:41:52 +0000 Subject: detect_devices::matching_driver -> matching_desc but matching driver names (kernel modules) --- perl-install/modules.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/modules.pm') diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 27253b594..edf4272d1 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -285,7 +285,7 @@ sub write_conf() { } my @l; push @l, 'scsi_hostadapter' if !is_empty_array_ref($conf{scsi_hostadapter}{probeall}); - push @l, 'bttv' if any { $_->{driver} eq 'bttv' } detect_devices::probeall(); + push @l, 'bttv' if detect_devices::matching_driver('^bttv$'); append_to_modules_loaded_at_startup("$::prefix/etc/modules", @l); append_to_modules_loaded_at_startup("$::prefix/etc/modprobe.preload", @l); -- cgit v1.2.1