diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-19 13:15:49 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-19 13:15:49 +0000 |
commit | e2fa2957786e78efb9e3bc988896e4ad1825de24 (patch) | |
tree | 68d2bfc246fc18aaee194bc2156755ec1a3e66b7 | |
parent | 6b57b33fd3a44739bfd4b6e5b28117f3fdb57d77 (diff) | |
download | drakx-backup-do-not-use-e2fa2957786e78efb9e3bc988896e4ad1825de24.tar drakx-backup-do-not-use-e2fa2957786e78efb9e3bc988896e4ad1825de24.tar.gz drakx-backup-do-not-use-e2fa2957786e78efb9e3bc988896e4ad1825de24.tar.bz2 drakx-backup-do-not-use-e2fa2957786e78efb9e3bc988896e4ad1825de24.tar.xz drakx-backup-do-not-use-e2fa2957786e78efb9e3bc988896e4ad1825de24.zip |
sort functions & checks when writing configuration
-rw-r--r-- | perl-install/security/msec.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm index 9284704c3..4870d75b6 100644 --- a/perl-install/security/msec.pm +++ b/perl-install/security/msec.pm @@ -127,7 +127,7 @@ sub set_check { sub apply_functions { my ($msec) = @_; - my @list = ($msec->list_functions('system'), $msec->list_functions('network')); + my @list = sort ($msec->list_functions('system'), $msec->list_functions('network')); substInFile { foreach my $function (@list) { s/^$function.*\n// } if (eof) { @@ -141,7 +141,7 @@ sub apply_functions { sub apply_checks { my ($msec) = @_; - my @list = $msec->list_checks; + my @list = sort $msec->list_checks; substInFile { foreach my $check (@list) { s/^$check.*\n// } if (eof) { |