* All variables from ARS needed by root methods may be accessed through a hash

record.  ($ars) = @_;  $ars->{device};

gBootRoot

@@ -147,7 +147,6 @@ my $button_count_root = 0;
 my $obj_count = 0;
 my $obj_count_root = 0;
 my ($lib_strip_check,$bin_strip_check);
-my ($lib_strip_check_root,$bin_strip_check_root,$module_strip_check_root);
 my ($bz2_toggle,$gz_toggle);
 my ($bz2_toggle_root,$gz_toggle_root,$compression_off);
 my ($combo);
@@ -592,24 +591,6 @@ sub objcopy_right_click_advanced {
 		  $obj_count--;
 	      }
           }
-	  if (defined $lib_strip_check_root) {
-	      if ($obj_count_root == 0) {
-		  $tooltips->set_tip( $lib_strip_check_root, 
-				      "This is generally a good idea." .
-				      " Press the right mouse button to" .
-				      " change from [objcopy --strip-all]" .
-				      " to [objcopy --strip-debug].", "" );
-		  $obj_count_root++;
-	      }
-	      else {
-		  $tooltips->set_tip( $lib_strip_check_root, 
-				      "This is generally a good idea." .
-				      " Press the right mouse button to" .
-				      " change from [objcopy --strip-debug]". 
-				      " to [objcopy --strip-all].", "" );
-		  $obj_count_root--;
-	      }
-          }
       }
   }
 
@@ -971,14 +952,30 @@ sub Generate {
     # 1 = Optional Devices
     # 2 = Append Options
     #------------------
-    $root_device = $entry_advanced[3]; # 3 = Root Device
+    # 3 = Root Device
-    $root_filename = $entry_advanced[4];  # 4 = Root Filename
+    # 4 = Root Filename
     # 5 = UML Kernel
     $method = $entry_advanced[6];         # 6 = Method
-    $template = $entry_advanced[7];       # 7 = Template
+    # 7 = Template
     # $root_device_size;
     # $filesystem_size;
 
+    # Stuff univeral for all root filesystem methods
+    # Compression, UML Kernel, and Method only need to be known by the Dock.
+    my $ars = { "device"             => $entry_advanced[3],
+		"device_size"        => $root_device_size,		    
+		"filename"           => $entry_advanced[4],
+		"filesystem_size"    => $filesystem_size,
+	        "kernel"             => $container[1],
+		"template_directory" => $template_dir,
+		"template"           => $entry_advanced[7],
+		"tmp"                => $tmp
+	       };
+
+    my $template = $ars->{template};
+    $root_device = $ars->{device};
+    $root_filename = $ars->{filename};
+
     if (!$root_device || $root_device eq "") {
 	error_window("gBootRoot: ERROR: Root Device not defined");	
 	return;
@@ -1002,12 +999,9 @@ sub Generate {
 	return;
     }
 
-    # Stuff univeral for all root filesystem methods
-    my @method_stuff = qw($filesystem_size $obj_count_root $tmp);
 
     if ($method eq "yard") {
-	my $kernel = $container[1];
+	yard($ars);
-	yard($kernel,$template_dir,$template);
     }