loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.111, 2003/08/01 18:04:10	version 1.112, 2003/08/04 21:18:55
Line 618 sub gradestatus {	Line 618 sub gradestatus {
my $solved = $Apache::lonhomework::history{"resource.$id.solved"};	my $solved = $Apache::lonhomework::history{"resource.$id.solved"};
my $previous = $Apache::lonhomework::history{"resource.$id.previous"};	my $previous = $Apache::lonhomework::history{"resource.$id.previous"};
&Apache::lonxml::debug("Found Award \|$award\|$solved\|");	&Apache::lonxml::debug("Found Award \|$award\|$solved\|");
if ( $award ne '' ) {	if ( $award ne '' \|\| $solved ne '') {
&Apache::lonxml::debug('Getting message');	&Apache::lonxml::debug('Getting message');
($showbutton,$bgcolor,$message,$previousmsg) =	($showbutton,$bgcolor,$message,$previousmsg) =
&decideoutput($award,$solved,$previous,$target);	&decideoutput($award,$solved,$previous,$target);