loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.456, 2011/01/24 16:18:41	version 1.457, 2011/03/10 23:13:52
Line 4968 sub check_for_slot {	Line 4968 sub check_for_slot {
my $taskstatus = $self->taskstatus();	my $taskstatus = $self->taskstatus();
$is_correct = (($taskstatus eq 'pass') \|\|	$is_correct = (($taskstatus eq 'pass') \|\|
($self->solved() =~ /^correct_/));	($self->solved() =~ /^correct_/));
$got_grade = ($self->solved() =~ /^(?:pass\|fail)$/);	$got_grade = ($taskstatus =~ /^(?:pass\|fail)$/);
} else {	} else {
$got_grade = 1;	$got_grade = 1;
$is_correct = ($self->solved() =~ /^correct_/);	$is_correct = ($self->solved() =~ /^correct_/);