loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.253, 2006/06/24 01:28:17	version 1.255, 2006/06/30 05:10:29
Line 344 sub check_slot_access {	Line 344 sub check_slot_access {
}	}

}	}

if ( $is_correct) {	if ( $is_correct) {
	if ($type eq 'problem') {
	return ($status);
	}
return ('SHOW_ANSWER');	return ('SHOW_ANSWER');
}	}

if ( $status eq 'CANNOT_ANSWER' &&	if ( $status eq 'CANNOT_ANSWER' &&
($slotstatus ne 'NEEDS_CHECKIN' && $slotstatus ne 'NOT_IN_A_SLOT')) {	($slotstatus ne 'NEEDS_CHECKIN' && $slotstatus ne 'NOT_IN_A_SLOT')) {
return ($status,$datemsg);	return ($status,$datemsg);
Line 814 sub editxmlmode {	Line 819 sub editxmlmode {
&Apache::loncommon::helpLatexCheatsheet("Problem_Editor_XML_Index",	&Apache::loncommon::helpLatexCheatsheet("Problem_Editor_XML_Index",
"Problem Editing Help").	"Problem Editing Help").
'</td><td>'.	'</td><td>'.
&Apache::loncommon::help_open_menu('',undef,undef,undef,5,'Authoring').	&Apache::loncommon::help_open_menu(undef,undef,5,'Authoring').
'</td></tr></table>';	'</td></tr></table>';
if ($cols > 80) { $cols = 80; }	if ($cols > 80) { $cols = 80; }
if ($cols < 70) { $cols = 70; }	if ($cols < 70) { $cols = 70; }