loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.374, 2007/02/24 01:44:14	version 1.376, 2007/04/07 00:12:43
Line 344 Feedback Mode:	Line 344 Feedback Mode:
'.'.&Apache::loncommon::help_open_topic("Analyze_Problem",	'.'.&Apache::loncommon::help_open_topic("Analyze_Problem",
'',undef,undef,300).	'',undef,undef,300).
'<hr />';	'<hr />';
	} elsif ($Apache::lonhomework::parsing_a_task) {
	$result.="
	<nobr>
	Problem Status:
	<select name='problemstate'>
	<option value=''></option>
	".&option('CLOSED' ,'problemstate').&mt("Closed")."</option>
	".&option('CAN_ANSWER' ,'problemstate').&mt("Answerable")."</option>
	".&option('WEB_GRADE' ,'problemstate').&mt("Criteria Grading")."</option>
	".&option('SHOW_ANSWER' ,'problemstate').&mt("Show Feedback")."</option>
	</select>
	</nobr>
	<input type='submit' name='changeproblemmode' value='".&mt("Change")."' />
	<hr />";
}	}
return $result;	return $result;
}	}
Line 739 sub start_problem {	Line 753 sub start_problem {
my $bodytext=&Apache::lonxml::get_all_text("/problem",$parser,	my $bodytext=&Apache::lonxml::get_all_text("/problem",$parser,
$style);	$style);
if ($target eq 'web') {	if ($target eq 'web') {
$result .= &Apache::bridgetask::proctor_validation_screen();	$result .=
	&Apache::bridgetask::proctor_validation_screen($slot);
} elsif ($target eq 'grade') {	} elsif ($target eq 'grade') {
&Apache::bridgetask::proctor_check_auth($slot_name,$slot,	&Apache::bridgetask::proctor_check_auth($slot_name,$slot,
'problem');	'problem');