From 195f44c2da47b9f0df0461b593935d89619a5a0e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Nov 2002 13:49:06 +0000
Subject: - use "foreach" instead of "for" in list context - use "for" instead
 of "foreach" when used a la C

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

(limited to 'perl-install/security')

diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index 76142da0d..4392b0038 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -80,7 +80,7 @@ sub get_default {
     elsif ($category eq "checks") { $default_file = "$::prefix/var/lib/msec/security.conf"; }
 
     open F, $default_file;
-    while(<F>) {
+    while (<F>) {
 	   if ($category eq 'functions') {
 		  if ($_ =~ /^$option/) { (undef, $default_value) = split(/ /, $_) }
 	   } elsif ($category eq 'checks') {
@@ -102,7 +102,7 @@ sub get_value {
 
     if (-e $item_file) {
         open F, $item_file;
-        while(<F>) {
+        while (<F>) {
             if ($_ =~ /^$item/) {
 			 if ($category eq 'functions') {
 				my $i = $_;
-- 
cgit v1.2.1