From 9aa15e945aa3846e06d2153bb1175d2372fbf7fa Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 20 May 2003 07:57:41 +0000
Subject: - fix #3616 (draksec discarding changes) - add a end of line btw at
 the end of file to please cat

---
 perl-install/security/msec.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install')

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};
 }
-- 
cgit v1.2.1