Diff for /loncom/homework/response.pm between versions 1.164 and 1.167

version 1.164, 2007/05/17 09:40:48 version 1.167, 2007/05/23 22:36:21
Line 391  sub start_customresponse { Line 391  sub start_customresponse {
   $safeeval,'answerdisplay');    $safeeval,'answerdisplay');
  if ($constructtag) {   if ($constructtag) {
     $result = &Apache::edit::rebuild_tag($token);      $result = &Apache::edit::rebuild_tag($token);
     $result.=&Apache::edit::handle_insert();  
  }   }
     } elsif ($target eq 'answer' || $target eq 'grade') {      } elsif ($target eq 'answer' || $target eq 'grade') {
  &Apache::response::reset_params();   &Apache::response::reset_params();
Line 499  sub start_mathresponse { Line 498  sub start_mathresponse {
   $safeeval,'answerdisplay','cas','args');    $safeeval,'answerdisplay','cas','args');
  if ($constructtag) {   if ($constructtag) {
     $result = &Apache::edit::rebuild_tag($token);      $result = &Apache::edit::rebuild_tag($token);
     $result.=&Apache::edit::handle_insert();  
  }   }
     } elsif ($target eq 'answer' || $target eq 'grade') {      } elsif ($target eq 'answer' || $target eq 'grade') {
  &Apache::response::reset_params();   &Apache::response::reset_params();
Line 677  sub start_responseparam { Line 675  sub start_responseparam {
  }   }
  if ($constructtag) {   if ($constructtag) {
     $result = &Apache::edit::rebuild_tag($token);      $result = &Apache::edit::rebuild_tag($token);
     $result.=&Apache::edit::handle_insert();  
  }   }
     } elsif ($target eq 'grade' || $target eq 'answer' || $target eq 'web' ||      } elsif ($target eq 'grade' || $target eq 'answer' || $target eq 'web' ||
      $target eq 'tex' || $target eq 'analyze' ) {       $target eq 'tex' || $target eq 'analyze' ) {
Line 1026  sub pick_foil_for_concept { Line 1023  sub pick_foil_for_concept {
 #  #
 #  Get a parameter associated with a problem.  #  Get a parameter associated with a problem.
 # Parameters:  # Parameters:
 #  $id        - the symb of the problem part within the map(?) ($part._$id).  #  $id        - the id of the paramater, either a part id, 
   #               or a partid and responspe id joined by _
 #  $name      - Name of the parameter to fetch  #  $name      - Name of the parameter to fetch
 #  $default   - Default value for the paramter.  #  $default   - Default value for the paramter.
 #  #

Removed from v.1.164  
changed lines
  Added in v.1.167


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