Diff for /loncom/homework/radiobuttonresponse.pm between versions 1.34 and 1.35

version 1.34, 2002/01/07 18:03:57 version 1.35, 2002/01/11 16:32:29
Line 45  sub start_radiobuttonresponse { Line 45  sub start_radiobuttonresponse {
     $result=&Apache::response::meta_package_write('radiobuttonresponse');      $result=&Apache::response::meta_package_write('radiobuttonresponse');
   } elsif ($target eq 'edit' ) {    } elsif ($target eq 'edit' ) {
     $result.=&Apache::edit::start_table($token).      $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)   &Apache::edit::deletelist($target,$token)
   ."</td><td>&nbsp</td></tr><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 Foils:','max',$token,'4').      $result.=&Apache::edit::text_arg('Max Number Of Foils:','max',$token,'4').
       "</td></tr>";   &Apache::edit::end_row().&Apache::edit::start_spanning_row()."\n";
     $result.="<tr><td colspan=\"3\">\n";  
   } elsif ($target eq 'modified') {    } elsif ($target eq 'modified') {
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,      my $constructtag=&Apache::edit::get_new_args($token,$parstack,
  $safeeval,'max');   $safeeval,'max');
Line 279  sub start_conceptgroup { Line 280  sub start_conceptgroup {
   if ($target eq 'edit') {    if ($target eq 'edit') {
     $result.=&Apache::edit::tag_start($target,$token);      $result.=&Apache::edit::tag_start($target,$token);
     $result.=&Apache::edit::text_arg('Concept:','concept',$token,'50').      $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') {    } elsif ($target eq 'modified') {
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,      my $constructtag=&Apache::edit::get_new_args($token,$parstack,
  $safeeval,'concept');   $safeeval,'concept');
Line 325  sub start_foil { Line 326  sub start_foil {
     $result.=&Apache::edit::text_arg('Name:','name',$token);      $result.=&Apache::edit::text_arg('Name:','name',$token);
     $result.=&Apache::edit::select_arg('Correct Option:','value',      $result.=&Apache::edit::select_arg('Correct Option:','value',
        ['unused','true','false'],$token);         ['unused','true','false'],$token);
       $result.=&Apache::edit::end_row().&Apache::edit::start_spanning_row();
   } elsif ($target eq 'modified') {    } elsif ($target eq 'modified') {
      my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,       my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,
   'value','name');    'value','name');

Removed from v.1.34  
changed lines
  Added in v.1.35


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>