From 915b7f6d6176969cdd1fc6d9551153649116a2a3 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 10 Sep 2002 09:02:40 +0000
Subject: inline seclevel_explain (why using functions to return a text label
 ?)

---
 perl-install/security/main.pm | 20 ++++++++++++++++----
 perl-install/security/msec.pm | 20 --------------------
 2 files changed, 16 insertions(+), 24 deletions(-)

diff --git a/perl-install/security/main.pm b/perl-install/security/main.pm
index 3e23a8ce9..4fed477a5 100644
--- a/perl-install/security/main.pm
+++ b/perl-install/security/main.pm
@@ -29,12 +29,24 @@ sub show_msec_help {
 }
 
 sub basic_seclevel_explanations {
-	my $msec = $_[0];
-	my $seclevel_explain = $msec->seclevel_explain();
-
 	my $text = new Gtk::Text(undef, undef);
 	$text->set_editable(0);
-	$text->insert(undef, $text->style->black, undef, $seclevel_explain);
+	$text->insert(undef, $text->style->black, undef,
+			    "Standard: This is the standard security recommended for a computer that will be used to connect
+               to the Internet as a client.
+
+High:       There are already some restrictions, and more automatic checks are run every night.
+
+Higher:    The security is now high enough to use the system as a server which can accept
+              connections from many clients. If your machine is only a client on the Internet, you
+	      should choose a lower level.
+
+Paranoid:  This is similar to the previous level, but the system is entirely closed and security
+                features are at their maximum
+
+Security Administrator:
+               If the 'Security Alerts' option is set, security alerts will be sent to this user (username or
+	       email)");
 
 	gtkpack_(gtkshow(new Gtk::HBox(0, 0)), 1, $text);
 }
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index 4e105f264..4bf604338 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -131,26 +131,6 @@ sub get_default {
     $default_value;
 }
 
-# ***********************************************
-#                 EXPLANATIONS
-# ***********************************************
-sub seclevel_explain {
-"Standard: This is the standard security recommended for a computer that will be used to connect
-               to the Internet as a client.
-
-High:       There are already some restrictions, and more automatic checks are run every night.
-
-Higher:    The security is now high enough to use the system as a server which can accept
-              connections from many clients. If your machine is only a client on the Internet, you
-	      should choose a lower level.
-
-Paranoid:  This is similar to the previous level, but the system is entirely closed and security
-                features are at their maximum
-
-Security Administrator:
-               If the 'Security Alerts' option is set, security alerts will be sent to this user (username or
-	       email)";
-}
 
 # ***********************************************
 #               SPECIFIC OPTIONS
-- 
cgit v1.2.1