summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-09-29 03:25:51 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-09-29 03:25:51 +0000
commitc36ea7f3d6b5195c92633a975b28bd642f996ad9 (patch)
tree172728835102c70f86f3d5105a8744b427780c4b /perl-install
parent5151781b92e205a63a87333ff0ffed91478d5ece (diff)
downloaddrakx-c36ea7f3d6b5195c92633a975b28bd642f996ad9.tar
drakx-c36ea7f3d6b5195c92633a975b28bd642f996ad9.tar.gz
drakx-c36ea7f3d6b5195c92633a975b28bd642f996ad9.tar.bz2
drakx-c36ea7f3d6b5195c92633a975b28bd642f996ad9.tar.xz
drakx-c36ea7f3d6b5195c92633a975b28bd642f996ad9.zip
(write_preload_conf) simplify
Diffstat (limited to 'perl-install')
-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};