From 36111d5a71b53451210b4b23467fda6b2fd90db3 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Fri, 7 Dec 2001 18:50:15 +0000
Subject: [PATCH] This saves state for tests within 1 program invocation.

---
 BootRoot/YardBox.pm | 64 +++++++++++++++++++++++++++++----------------
 1 file changed, 41 insertions(+), 23 deletions(-)

diff --git a/BootRoot/YardBox.pm b/BootRoot/YardBox.pm
index ca09f8e..78e159f 100644
--- a/BootRoot/YardBox.pm
+++ b/BootRoot/YardBox.pm
@@ -828,7 +828,7 @@ sub yard_box {
     my $main_vbox = new Gtk::VBox( $false, 0 );
     $main::yard_window->add( $main_vbox );
     $main_vbox->show();
-
+    
     my $vbox = new Gtk::VBox( $false, 0 );
     $vbox->border_width( 0 );
     $main_vbox->pack_start( $vbox, $false, $true, 0 );
@@ -913,11 +913,11 @@ sub yard_box {
     $user_defined->active(0);
 
     # Stripping
-
+    
     # Libraries
     my $lib_strip = $item_factory->get_item
 	('/Edit/Settings/Stripping/Libraries');
-       
+    
     $lib_strip->active($true);
     $lib_strip->signal_connect( "activate", 
 				sub {  
@@ -937,17 +937,17 @@ sub yard_box {
 
     # objcopy parameters for Libraries
     $lib_strip_all = $item_factory->get_item
-    ('/Edit/Settings/Stripping/settings/strip-all');
+      ('/Edit/Settings/Stripping/settings/strip-all');
     $lib_strip_debug = $item_factory->get_item
-    ('/Edit/Settings/Stripping/settings/strip-debug');
+      ('/Edit/Settings/Stripping/settings/strip-debug');
     $lib_strip_debug->active(0);
 
     # Binaries
     my $bin_strip = $item_factory->get_item
-    ('/Edit/Settings/Stripping/Binaries');
+      ('/Edit/Settings/Stripping/Binaries');
     $bin_strip->active($true);
     $bin_strip->signal_connect( "activate", 
-				   sub { 
+    sub { 
 				         if ($bin_bool eq "") {
 					    $bin_bool = 0;
 				         }
@@ -964,12 +964,12 @@ sub yard_box {
 				 ); 
 
 
-       # Modules
-       my $mod_strip = $item_factory->get_item
-	   ('/Edit/Settings/Stripping/Modules');
-       $mod_strip->active($true);
-       $mod_strip->signal_connect( "activate", 
-				   sub { 
+    # Modules
+    my $mod_strip = $item_factory->get_item
+    ('/Edit/Settings/Stripping/Modules');
+    $mod_strip->active($true);
+     $mod_strip->signal_connect( "activate", 
+                                        sub { 
 					 # off
 				         if ($mod_bool eq "") {
 					     $mod_bool = 0;
@@ -986,7 +986,7 @@ sub yard_box {
 				 ); 
 
 
-       # Checking - Replacements and/or Modules?
+      # Checking - Replacements and/or Modules?
 
        # Replacements
 ##       my $replacement_check = $item_factory->get_item
@@ -1023,27 +1023,45 @@ sub yard_box {
 ##				     }
 ##				 );        
 
+
+
        # Tests
        my $test_fstab = $item_factory->get_item('/Tests/fstab'); 
-       $test_fstab->active(1);
+       $tests{30}{test_fstab} == 1 ? $test_fstab->active(1) : 
+       $test_fstab->active(0);
+
        my $test_inittab = $item_factory->get_item('/Tests/inittab');  
-       $test_inittab->active(1);
+       $tests{31}{test_inittab} == 1 ? $test_inittab->active(1) :
+       $test_inittab->active(0);
+
        my $test_scripts = $item_factory->get_item('/Tests/scripts'); 
-       $test_scripts->active(1);
+       $tests{32}{test_scripts} == 1 ? $test_scripts->active(1) : 
+       $test_scripts->active(0);
+
        my $test_links = $item_factory->get_item('/Tests/links'); 
-       $test_links->active(1);
+       $tests{33}{test_links} == 1 ? $test_links->active(1) :
+       $test_links->active(0);
+
        my $test_passwd = $item_factory->get_item('/Tests/passwd'); 
-       $test_passwd->active(1);
+       $tests{34}{test_passwd} == 1 ? $test_passwd->active(1) :
+       $test_passwd->active(0);
+
        my $test_pam = $item_factory->get_item('/Tests/pam'); 
-       $test_pam->active(1);
+       $tests{35}{test_pam} == 1 ? $test_pam->active(1) :
+       $test_pam->active(0);
+
        my $test_nss = $item_factory->get_item('/Tests/nss');
-       $test_nss->active(1);
+       $tests{36}{test_nss} == 1 ? $test_nss->active(1) :
+       $test_nss->active(0);
 
        # PAM NSS Conf
        my $conf_nss = $item_factory->get_item('/Edit/Settings/NSS Config'); 
-       $conf_nss->active(1);
+       $nss_pam{60}{conf_nss} == 1 ? $conf_nss->active(1) :
+       $conf_nss->active(0);
+
        my $conf_pam = $item_factory->get_item('/Edit/Settings/PAM Config'); 
-       $conf_pam->active(1);
+       $nss_pam{61}{conf_pam} == 1 ? $conf_pam->active(1) :
+       $conf_pam->active(0);
 
        #_______________________________________ 
        # Create the GtkText widget