From 5b168775f4611b981231c923e69204ea15dfb750 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Fri, 3 Aug 2001 03:55:00 +0000
Subject: [PATCH] Gets rid of some test markers.

---
 BootRoot/Yard.pm    |  3 +--
 BootRoot/YardBox.pm | 18 +++++++++---------
 2 files changed, 10 insertions(+), 11 deletions(-)

diff --git a/BootRoot/Yard.pm b/BootRoot/Yard.pm
index d346348..d4f9e8e 100644
--- a/BootRoot/Yard.pm
+++ b/BootRoot/Yard.pm
@@ -1107,7 +1107,7 @@ sub info {
   if ($level != 3) {
       print LOGFILE @msgs; 
   }
-  $level = 0x if $level == 3;
+  $level = 0 if $level == 3;
 
   my $output = join("",@msgs);
   if ($verbosity >= $level) {
@@ -2159,7 +2159,6 @@ BLARD
 	    ##  - Add a 'noauto' option if it doesn't already have one
 	    ##  - Put mountpoint under oldroot
 	    $options .= ',noauto' unless $options =~ /\bnoauto\b/;
-	    print "$device $mpt\n";
 	    if ($mpt eq '/') {
 		$mpt = "/"; # limitation of mount cmd
 	    } else {
diff --git a/BootRoot/YardBox.pm b/BootRoot/YardBox.pm
index 50e03f6..6501954 100644
--- a/BootRoot/YardBox.pm
+++ b/BootRoot/YardBox.pm
@@ -331,7 +331,7 @@ sub strip_all {
 
     $lib_strip_debug->active(0);
     $strip_bool = 1;
-    print "$strip_bool\n";
+#    print "$strip_bool\n";
 
 }
 
@@ -339,7 +339,7 @@ sub strip_debug {
 
     $lib_strip_all->active(0);
     $strip_bool = 0;
-    print "$strip_bool\n";
+#    print "$strip_bool\n";
 
 }
 
@@ -356,7 +356,7 @@ sub stages_one_by_one {
     $continuous->active(0);
     $user_defined->active(0);
     $stages_bool = "one-by-one";
-    print "$stages_bool\n";
+#    print "$stages_bool\n";
     
 
 }
@@ -366,7 +366,7 @@ sub stages_continuous {
     $one_by_one->active(0);
     $user_defined->active(0);
     $stages_bool = "continuous";
-    print "$stages_bool\n";
+#    print "$stages_bool\n";
 
 }
 
@@ -375,7 +375,7 @@ sub stages_user_defined {
     $one_by_one->active(0);
     $continuous->active(0);
     $stages_bool = "user-defined";
-    print "$stages_bool\n";
+#    print "$stages_bool\n";
 }
 
 
@@ -455,7 +455,7 @@ sub which_stage {
 	    }
 	}
 
-    for (keys %$continue) { print $_, "=>", $continue->{$_}, "\n"; }
+#    for (keys %$continue) { print $_, "=>", $continue->{$_}, "\n"; }
 
     } # end if one-by-one or continuous
 
@@ -847,7 +847,7 @@ sub yard_box {
 					 else {
 					     $lib_bool++;               
 					 }
-					 print "$lib_bool\n";
+					 #print "$lib_bool\n";
 				     }
                                    ); 
 
@@ -875,7 +875,7 @@ sub yard_box {
 					 else {
 					     $bin_bool++;
 					 }
-					 print "$bin_bool\n";
+					 #print "$bin_bool\n";
 				     }
 				 ); 
 
@@ -897,7 +897,7 @@ sub yard_box {
 					 else {
 					     $mod_bool++;
 					 }
-					 print "$mod_bool\n";
+					 #print "$mod_bool\n";
 				     }
 				 );