loncom/homework/hint.pm - diff

Return to hint.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.46, 2004/01/07 21:01:17	version 1.47, 2004/03/04 21:21:55
Line 48 sub start_hintgroup {	Line 48 sub start_hintgroup {
my $numtries=$Apache::lonhomework::history{"resource.$id.tries"};	my $numtries=$Apache::lonhomework::history{"resource.$id.tries"};
if ( $numtries eq '') { $numtries = 0; }	if ( $numtries eq '') { $numtries = 0; }
my $hinttries=&Apache::lonnet::EXT("resource.$id.hinttries");	my $hinttries=&Apache::lonnet::EXT("resource.$id.hinttries");
	if ($ENV{'request.state'} eq 'construct' &&
	defined($Apache::inputtags::params{'hinttries'})) {
	$hinttries=$Apache::inputtags::params{'hinttries'};
	}

if ( $hinttries eq '') { $hinttries = 1; }	if ( $hinttries eq '') { $hinttries = 1; }
&Apache::lonxml::debug("found :$id:$numtries:$hinttries:");	&Apache::lonxml::debug("found :$id:$numtries:$hinttries:");
my $gradestatus=$Apache::lonhomework::history{"resource.$id.solved"};	my $gradestatus=$Apache::lonhomework::history{"resource.$id.solved"};