From 6e20688d9e3a7105f1af7f291b095f7fe9c10a01 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 26 Jun 2002 11:33:22 +0000
Subject: "my" variables where needed

---
 perl-install/any.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 09f52b8b8..840bb8275 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1037,6 +1037,7 @@ sub choose_security_options {
     my @shown_options = ();
     my $key = "";
     my $i=0;
+    my $title;
 		        
     my $expert_section = cat_($expert_file);
 
@@ -1065,6 +1066,8 @@ sub choose_security_level {
     my ($in, $security, $libsafe) = @_;
     my $expert_file = "/etc/security/msec/expert_mode";
 
+    my $email;
+
     my %l = (
       0 => _("Welcome To Crackers"),
       1 => _("Poor"),
-- 
cgit v1.2.1