diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/modules.pm | 2 |
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}; |