version 1.308, 2009/03/26 18:21:24
|
version 1.310.4.1, 2010/08/20 03:48:29
|
Line 111 sub get_target {
|
Line 111 sub get_target {
|
} elsif ( $env{'form.grade_target'} eq 'webgrade' |
} elsif ( $env{'form.grade_target'} eq 'webgrade' |
&& ($Apache::lonhomework::queuegrade eq 'F' )) { |
&& ($Apache::lonhomework::queuegrade eq 'F' )) { |
return ($env{'form.grade_target'}); |
return ($env{'form.grade_target'}); |
} |
} elsif ($env{'form.grade_target'} eq 'answer') { |
|
if ($env{'form.answer_output_mode'} eq 'tex') { |
|
return ($env{'form.grade_target'}); |
|
} |
|
} |
if ($env{'form.webgrade'} && |
if ($env{'form.webgrade'} && |
($Apache::lonhomework::modifygrades eq 'F' |
($Apache::lonhomework::modifygrades eq 'F' |
|| $Apache::lonhomework::queuegrade eq 'F' )) { |
|| $Apache::lonhomework::queuegrade eq 'F' )) { |
Line 297 sub check_slot_access {
|
Line 301 sub check_slot_access {
|
return ('WAITING_FOR_GRADE'); |
return ('WAITING_FOR_GRADE'); |
} |
} |
|
|
# no slot is currently open, and has been checked in for this version |
# Previously used slot is no longer open, and has been checked in for this version. |
# previous slot is therefore CLOSED, so therefore the problem is |
# However, the problem is not closed, and potentially, another slot might be |
|
# used to gain access to it to work on it, until the due date is reached, and the |
|
# problem then becomes CLOSED. Therefore return the slotstatus - |
|
# (which will be NOT_IN_SLOT). |
if (!defined($slot_name) |
if (!defined($slot_name) |
&& $checkedin |
&& $checkedin |
&& $type eq 'problem') { |
&& $type eq 'problem') { |
return ('CLOSED',$datemsg); |
return ($slotstatus); |
} |
} |
|
|
if ($slotstatus eq 'NOT_IN_A_SLOT' |
if ($slotstatus eq 'NOT_IN_A_SLOT' |
Line 690 sub analyze_header {
|
Line 697 sub analyze_header {
|
|
|
$result .= |
$result .= |
&Apache::lonxml::message_location().' |
&Apache::lonxml::message_location().' |
<form name="lonhomework" method="POST" action="'. |
<form name="lonhomework" method="post" action="'. |
&HTML::Entities::encode($env{'request.uri'},'<>&"').'">'. |
&HTML::Entities::encode($env{'request.uri'},'<>&"').'">'. |
'<input type="hidden" name="problemmode" value="'. |
'<input type="hidden" name="problemmode" value="'. |
$env{'form.problemmode'}.'" />'. |
$env{'form.problemmode'}.'" />'. |
Line 921 sub editxmlmode {
|
Line 928 sub editxmlmode {
|
}}); |
}}); |
$result.=$start_page. |
$result.=$start_page. |
&renderpage($request,$file,['no_output_web'],1). |
&renderpage($request,$file,['no_output_web'],1). |
'<form '.&Apache::edit::form_change_detection().' name="lonhomework" method="POST" action="'. |
'<form '.&Apache::edit::form_change_detection().' name="lonhomework" method="post" action="'. |
&HTML::Entities::encode($env{'request.uri'},'<>&"').'">'. |
&HTML::Entities::encode($env{'request.uri'},'<>&"').'">'. |
&Apache::structuretags::remember_problem_state().' |
&Apache::structuretags::remember_problem_state().' |
<div class="LC_edit_problem_editxml_header"> |
<div class="LC_edit_problem_editxml_header"> |
Line 1142 $errormsg
|
Line 1149 $errormsg
|
<p> |
<p> |
<b> |
<b> |
".&mt("To create a new $extension, select a template from the". |
".&mt("To create a new $extension, select a template from the". |
" list below. Then click on the \"Create $extension\" button.")."</b> |
" list below. Then click on the \"Create $extension\" button.").'</b> |
</p><form action=\"$url\" method=\"POST\">"); |
</p><form action="'.$url.'" method="post">'); |
|
|
if (defined($templatelist)) { |
if (defined($templatelist)) { |
$request->print($templatelist); |
$request->print($templatelist); |