diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-12 01:50:10 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-12 01:50:10 +0000 |
| commit | 48cb9679bbb7fcb28d9d478a3a42208e88e6d9e3 (patch) | |
| tree | d82b6ab50db678aea772cbf465e01724787e8f6e | |
| parent | 397b67bb86b6cc5109c6583c8efd8bfc06514055 (diff) | |
| download | drakx-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.pm | 2 |
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 { |