From a01f2d0b2a80a6543b8170d3fb8fdec44c31ac8c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 22 Mar 2004 09:14:12 +0000
Subject: typo fix

---
 perl-install/modules.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 785e53edf..59c89903f 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -312,7 +312,9 @@ sub write_conf() {
     }
     my @l;
     push @l, 'scsi_hostadapter' if !is_empty_array_ref($conf{scsi_hostadapter}{probeall});
-    push @l, $_ if detect_devices::matching_driver('^$_$') foreach qw(bttv cx8800 saa7134);
+    foreach (qw(bttv cx8800 saa7134)) {
+        push @l, $_ if detect_devices::matching_driver('^$_$');
+    }
     my @l_26 = @l;
     if (my ($agp) = probe_category('various/agpgart')) {
 	push @l_26, $agp->{driver};
-- 
cgit v1.2.1