summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-12 01:50:10 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-12 01:50:10 +0000
commit48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3 (patch)
treed82b6ab50db678aea772cbf465e01724787e8f6e
parent397b67bb86b6cc5109c6583c8efd8bfc06514055 (diff)
downloaddrakx-48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3.tar
drakx-48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3.tar.gz
drakx-48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3.tar.bz2
drakx-48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3.tar.xz
drakx-48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3.zip
use difference2() as suggested by new perl_checker warning
-rw-r--r--perl-install/security/msec.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index 7b07f1c30..35efe8462 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -83,7 +83,7 @@ sub raw_checks_list {
sub list_checks {
my ($msec) = @_;
- grep { !member($_, qw(MAIL_WARN MAIL_USER)) } $msec->raw_checks_list;
+ difference2([ $msec->raw_checks_list ], [ qw(MAIL_WARN MAIL_USER) ]);
}
sub list_functions {