diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-07-27 11:18:52 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-07-27 11:18:52 +0000 |
commit | dc185170e8f7fa005e92bea979ed2a2cf7d75802 (patch) | |
tree | 622acc52f2076f108adceb4bda13e56fe9058701 | |
parent | eea3fc35c356ba099b313b96f01226dee30fadf6 (diff) | |
download | drakx-backup-do-not-use-dc185170e8f7fa005e92bea979ed2a2cf7d75802.tar drakx-backup-do-not-use-dc185170e8f7fa005e92bea979ed2a2cf7d75802.tar.gz drakx-backup-do-not-use-dc185170e8f7fa005e92bea979ed2a2cf7d75802.tar.bz2 drakx-backup-do-not-use-dc185170e8f7fa005e92bea979ed2a2cf7d75802.tar.xz drakx-backup-do-not-use-dc185170e8f7fa005e92bea979ed2a2cf7d75802.zip |
forward #14364/#15049 fix:
(load_values) fix getting value when it's defined but 0
(get_function_value) fix getting value when it's 0
-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 35efe8462..e4b9da561 100644 --- a/perl-install/security/msec.pm +++ b/perl-install/security/msec.pm @@ -49,7 +49,7 @@ sub load_values { chop $val; $val =~ s/[()]//g; chop $opt if $separator eq '\('; # $opt =~ s/ //g if $separator eq '\('; - if_($val, $opt => $val); + if_(defined($val), $opt => $val); } cat_($msec->{$category}{values_file}); } @@ -60,7 +60,7 @@ sub load_values { sub get_function_value { my ($msec, $function) = @_; - $msec->{functions}{value}{$function} || "default"; + exists $msec->{functions}{value}{$function} ? $msec->{functions}{value}{$function} : "default"; } sub get_check_value { |