loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.231, 2004/02/02 17:28:53	version 1.232, 2004/02/06 22:36:40
Line 523 sub end_problem {	Line 523 sub end_problem {
if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|	if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer' \|\|
$target eq 'tex') {	$target eq 'tex') {
if ( $target eq 'grade' && $Apache::inputtags::part eq '0' &&	if ( $target eq 'grade' && $Apache::inputtags::part eq '0' &&
$status eq 'CAN_ANSWER' ) {	($status eq 'CAN_ANSWER' \|\| $Apache::lonhomework::scantronmode)) {
# if part is zero, no <part>s existed, so we need to the grading	# if part is zero, no <part>s existed, so we need to the grading
&Apache::inputtags::grade;	&Apache::inputtags::grade;
} elsif ( ($target eq 'web' \|\| $target eq 'tex') &&	} elsif ( ($target eq 'web' \|\| $target eq 'tex') &&
Line 1015 sub end_part {	Line 1015 sub end_part {
my $result='';	my $result='';
if ( $target eq 'meta' ) {	if ( $target eq 'meta' ) {
$result='';	$result='';
} elsif ( $target eq 'grade' && $status eq 'CAN_ANSWER' && !$hidden) {	} elsif ($target eq 'grade' &&
	($status eq 'CAN_ANSWER' \|\| $Apache::lonhomework::scantronmode) &&
	!$hidden) {
$result=&Apache::inputtags::grade;	$result=&Apache::inputtags::grade;
} elsif (($target eq 'web' \|\| $target eq 'tex') && !$hidden ) {	} elsif (($target eq 'web' \|\| $target eq 'tex') && !$hidden ) {
my $gradestatus=&Apache::inputtags::gradestatus($Apache::inputtags::part,	my $gradestatus=&Apache::inputtags::gradestatus($Apache::inputtags::part,