From c1e398be894ecce6394bd76c99b76c022979ac62 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Nov 2002 13:29:44 +0000
Subject: various small syntax enhancements to please perl_checker

---
 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 c069fba35..76142da0d 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -103,11 +103,11 @@ sub get_value {
     if (-e $item_file) {
         open F, $item_file;
         while(<F>) {
-            if($_ =~ /^$item/) {
+            if ($_ =~ /^$item/) {
 			 if ($category eq 'functions') {
 				my $i = $_;
 				(undef, $_) = split /\(/;
-				tr /()//d;
+				tr/()//d;
 				$value = $_;
 				$_ = $i;
 			 } elsif ($category eq 'checks') {
-- 
cgit v1.2.1