diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-10 02:29:51 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-10 02:29:51 +0000 |
commit | 271821c72246e100aac347331bbe3a88e3809b82 (patch) | |
tree | cf198409dd2e51ac00c4814b2c1ab13a0af3bd04 | |
parent | 3ff0fc9692a3dcc1e25e77fb8137c177ec62687c (diff) | |
download | drakx-271821c72246e100aac347331bbe3a88e3809b82.tar drakx-271821c72246e100aac347331bbe3a88e3809b82.tar.gz drakx-271821c72246e100aac347331bbe3a88e3809b82.tar.bz2 drakx-271821c72246e100aac347331bbe3a88e3809b82.tar.xz drakx-271821c72246e100aac347331bbe3a88e3809b82.zip |
perl_checker compliance
-rw-r--r-- | perl-install/modules/modprobe_conf.pm | 2 | ||||
-rw-r--r-- | perl-install/modules/modules_conf.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/modules/modprobe_conf.pm b/perl-install/modules/modprobe_conf.pm index 1bc5e478c..2db68122d 100644 --- a/perl-install/modules/modprobe_conf.pm +++ b/perl-install/modules/modprobe_conf.pm @@ -12,7 +12,7 @@ sub handled_fields { qw(alias options install remove) } sub mapping { my ($_conf, @modules) = @_; my @l = map { modules::mapping_24_26($_) } @modules; - wantarray ? @l : $l[0]; + wantarray() ? @l : $l[0]; } sub get_above { diff --git a/perl-install/modules/modules_conf.pm b/perl-install/modules/modules_conf.pm index c0944010d..476fd300f 100644 --- a/perl-install/modules/modules_conf.pm +++ b/perl-install/modules/modules_conf.pm @@ -12,7 +12,7 @@ sub handled_fields { qw(alias above options probeall) } sub mapping { my ($_conf, @modules) = @_; my @l = map { modules::mapping_26_24($_) } @modules; - wantarray ? @l : $l[0]; + wantarray() ? @l : $l[0]; } sub get_above { |