loncom/homework/response.pm - diff

Return to response.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.151, 2006/12/04 21:12:57	version 1.152, 2006/12/04 21:23:01
Line 373 sub start_customresponse {	Line 373 sub start_customresponse {
if ( &Apache::response::show_answer() ) {	if ( &Apache::response::show_answer() ) {
my $answer = &Apache::lonxml::get_param('answerdisplay',$parstack,	my $answer = &Apache::lonxml::get_param('answerdisplay',$parstack,
$safeeval);	$safeeval);
$Apache::inputtags::answertxt{$id}=$answer;	$Apache::inputtags::answertxt{$id}=[$answer];
}	}
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.=&Apache::edit::tag_start($target,$token);	$result.=&Apache::edit::tag_start($target,$token);
Line 464 sub start_mathresponse {	Line 464 sub start_mathresponse {
if ( &Apache::response::show_answer() ) {	if ( &Apache::response::show_answer() ) {
my $answer = &Apache::lonxml::get_param('answerdisplay',$parstack,	my $answer = &Apache::lonxml::get_param('answerdisplay',$parstack,
$safeeval);	$safeeval);
$Apache::inputtags::answertxt{$id}=$answer;	$Apache::inputtags::answertxt{$id}=[$answer];
}	}
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.=&Apache::edit::tag_start($target,$token);	$result.=&Apache::edit::tag_start($target,$token);