--- loncom/homework/radiobuttonresponse.pm	2002/01/07 18:03:57	1.34
+++ loncom/homework/radiobuttonresponse.pm	2002/01/25 16:11:37	1.37
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # mutliple choice style responses
 #
-# $Id: radiobuttonresponse.pm,v 1.34 2002/01/07 18:03:57 albertel Exp $
+# $Id: radiobuttonresponse.pm,v 1.37 2002/01/25 16:11:37 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -30,7 +30,7 @@
 package Apache::radiobuttonresponse;
 use strict;
 
-sub BEGIN {
+BEGIN {
   &Apache::lonxml::register('Apache::radiobuttonresponse',('radiobuttonresponse'));
 }
 
@@ -45,12 +45,13 @@ sub start_radiobuttonresponse {
     $result=&Apache::response::meta_package_write('radiobuttonresponse');
   } elsif ($target eq 'edit' ) {
     $result.=&Apache::edit::start_table($token).
-      '<tr><td>'.&Apache::lonxml::description($token)."</td><td>Delete:".
+	'<tr><td>'.&Apache::lonxml::description($token)."</td><td>Delete:".
 	&Apache::edit::deletelist($target,$token)
-	  ."</td><td>&nbsp</td></tr><tr><td colspan=\"3\">\n";
-    $result.=&Apache::edit::text_arg('Max Number Of Foils:','max',$token,'4').
-      "</td></tr>";
-    $result.="<tr><td colspan=\"3\">\n";
+	."</td><td>&nbsp".&Apache::edit::end_row()
+        .&Apache::edit::start_spanning_row();
+
+    $result.=&Apache::edit::text_arg('Max Number Of Shown Foils:','max',$token,'4').
+	&Apache::edit::end_row().&Apache::edit::start_spanning_row()."\n";
   } elsif ($target eq 'modified') {
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,
 						 $safeeval,'max');
@@ -279,7 +280,7 @@ sub start_conceptgroup {
   if ($target eq 'edit') {
     $result.=&Apache::edit::tag_start($target,$token);
     $result.=&Apache::edit::text_arg('Concept:','concept',$token,'50').
-      "</td></tr><tr><td colspan=\"3\">\n";
+	&Apache::edit::end_row().&Apache::edit::start_spanning_row();
   } elsif ($target eq 'modified') {
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,
 						 $safeeval,'concept');
@@ -325,6 +326,7 @@ sub start_foil {
     $result.=&Apache::edit::text_arg('Name:','name',$token);
     $result.=&Apache::edit::select_arg('Correct Option:','value',
 				       ['unused','true','false'],$token);
+    $result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row();
   } elsif ($target eq 'modified') {
      my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,
 						  'value','name');