summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-05-20 07:57:41 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-05-20 07:57:41 +0000
commit9aa15e945aa3846e06d2153bb1175d2372fbf7fa (patch)
tree007efb4d8cd3c59b300c62bd7e5add8cd22d53ba /perl-install
parent732b403d9a4b616f95bb5171535d3b8f9035b42f (diff)
downloaddrakx-9aa15e945aa3846e06d2153bb1175d2372fbf7fa.tar
drakx-9aa15e945aa3846e06d2153bb1175d2372fbf7fa.tar.gz
drakx-9aa15e945aa3846e06d2153bb1175d2372fbf7fa.tar.bz2
drakx-9aa15e945aa3846e06d2153bb1175d2372fbf7fa.tar.xz
drakx-9aa15e945aa3846e06d2153bb1175d2372fbf7fa.zip
- fix #3616 (draksec discarding changes)
- add a end of line btw at the end of file to please cat
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/security/msec.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index c672d0cb1..f03760c09 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -131,10 +131,10 @@ sub apply_functions {
substInFile {
foreach my $function (@list) { s/^$function.*\n// }
if (eof) {
- print "\n", join("\n", map {
+ $_ .= join("\n", if_(!$_, ''), (map {
my $value = $msec->get_function_value($_);
if_($value ne 'default', "$_ ($value)");
- } @list);
+ } @list), "");
}
} $msec->{functions}{values_file};
}