summaryrefslogtreecommitdiffstats
path: root/perl-install/modules.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r--perl-install/modules.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index a5211cf60..29c101691 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -175,7 +175,7 @@ sub write_preload_conf {
push @l, 'scsi_hostadapter' if $conf->get_probeall('scsi_hostadapter');
push @l, intersection([ qw(bttv cx8800 saa7134) ],
[ map { $_->{driver} } detect_devices::probeall() ]);
- push @, 'nvram' if any { m!^N: Name="SynPS/2 Synaptics TouchPad"$! } cat_('/proc/bus/input/devices');
+ push @, 'nvram' if cat_('/proc/bus/input/devices') =~ m!^N: Name="SynPS/2 Synaptics TouchPad"$!m;
my @l_26 = @l;
if (my ($agp) = probe_category('various/agpgart')) {
push @l_26, $agp->{driver};