loncom/homework/hint.pm - diff

Return to hint.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.60, 2005/08/26 18:57:25	version 1.61, 2005/12/01 18:46:31
Line 57 sub start_hintgroup {	Line 57 sub start_hintgroup {
if ( ($showoncorrect ne 'yes' && &Apache::response::show_answer()) \|\|	if ( ($showoncorrect ne 'yes' && &Apache::response::show_answer()) \|\|
( $numtries < $hinttries) ) {	( $numtries < $hinttries) ) {
&Apache::lonxml::debug("Grabbin all");	&Apache::lonxml::debug("Grabbin all");
&Apache::lonxml::get_all_text("/hintgroup",$parser);	&Apache::lonxml::get_all_text("/hintgroup",$parser,$style);
}	}
&Apache::lonxml::startredirection;	&Apache::lonxml::startredirection;
} elsif ($target eq 'tex') {	} elsif ($target eq 'tex') {
Line 322 sub start_hintpart {	Line 322 sub start_hintpart {
foreach $which (@Apache::hint::which) { if ($which eq $on) { $show = 1; last } }	foreach $which (@Apache::hint::which) { if ($which eq $on) { $show = 1; last } }
}	}
if (!$show) {	if (!$show) {
&Apache::lonxml::get_all_text("/hintpart",$parser);	&Apache::lonxml::get_all_text("/hintpart",$parser,$style);
}	}
} elsif ($target eq 'grade') {	} elsif ($target eq 'grade') {
&Apache::lonxml::get_all_text("/hintpart",$parser);	&Apache::lonxml::get_all_text("/hintpart",$parser,$style);
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.= &Apache::edit::tag_start($target,$token);	$result.= &Apache::edit::tag_start($target,$token);
$result.= &Apache::edit::text_arg('On:','on',$token);	$result.= &Apache::edit::text_arg('On:','on',$token);