loncom/homework/essayresponse.pm - diff

Return to essayresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.112, 2010/08/29 19:36:37	version 1.113, 2010/12/31 02:40:14
Line 68 sub start_essayresponse {	Line 68 sub start_essayresponse {
if ($Apache::lonhomework::history{"resource.$part.award"} eq 'DRAFT') {	if ($Apache::lonhomework::history{"resource.$part.award"} eq 'DRAFT') {
$status_text .= '<br />'.&mt('(Currently -- draft)');	$status_text .= '<br />'.&mt('(Currently -- draft)');
}	}
$result.= '<p>'.&Apache::lonhtmlcommon::start_pick_box().	$result.= '<div>'.&Apache::lonhtmlcommon::start_pick_box().
&Apache::lonhtmlcommon::row_title($status_text);	&Apache::lonhtmlcommon::row_title($status_text);
if (($Apache::lonhomework::type ne 'survey') &&	if (($Apache::lonhomework::type ne 'survey') &&
($Apache::lonhomework::type ne 'surveycred') &&	($Apache::lonhomework::type ne 'surveycred') &&
Line 111 sub start_essayresponse {	Line 111 sub start_essayresponse {
}	}
$result.=&Apache::inputtags::file_selector($part,$id,$uploadedfiletypes,	$result.=&Apache::inputtags::file_selector($part,$id,$uploadedfiletypes,
$filesfrom,undef,$maxfilesize);	$filesfrom,undef,$maxfilesize);
$result.=&Apache::lonhtmlcommon::end_pick_box().'</p>';	$result.=&Apache::lonhtmlcommon::end_pick_box().'</div>';
} elsif ($target eq 'web' &&	} elsif ($target eq 'web' &&
$Apache::inputtags::status[-1] ne 'CAN_ANSWER') {	$Apache::inputtags::status[-1] ne 'CAN_ANSWER') {
my $part= $Apache::inputtags::part;	my $part= $Apache::inputtags::part;