|
version 1.596.2.9, 2011/10/23 02:15:25
|
version 1.596.2.11, 2011/11/29 17:17:35
|
|
Line 9382 sub assign_clicker_grades {
|
Line 9382 sub assign_clicker_grades {
|
| # FIXME: This should probably look for the first handgradeable part |
# FIXME: This should probably look for the first handgradeable part |
| my $part=$$partlist[0]; |
my $part=$$partlist[0]; |
| # Start screen output |
# Start screen output |
| my ($result) = &showResourceInfo($symb,$env{'form.probTitle'}).'<br />'; |
my ($result) = &showResourceInfo($symb,$env{'form.probTitle'}); |
| |
|
| $result .= &Apache::loncommon::start_data_table(). |
$result .= '<br />'. |
| |
&Apache::loncommon::start_data_table(). |
| &Apache::loncommon::start_data_table_header_row(). |
&Apache::loncommon::start_data_table_header_row(). |
| '<th>'.&mt('Assigning grades based on clicker file').'</th>'. |
'<th>'.&mt('Assigning grades based on clicker file').'</th>'. |
| &Apache::loncommon::end_data_table_header_row(). |
&Apache::loncommon::end_data_table_header_row(). |
|
Line 9572 sub handler {
|
Line 9573 sub handler {
|
| } else { |
} else { |
| &init_perm(); |
&init_perm(); |
| if (!$env{'request.course.id'}) { |
if (!$env{'request.course.id'}) { |
| # Not in a course. |
unless ((&Apache::lonnet::allowed('usc',$env{'request.role.domain'})) && |
| $env{'user.error.msg'}="/adm/grades::vgr:0:0:Cannot display grades page outside course context"; |
($command =~ /^scantronupload/)) { |
| return HTTP_NOT_ACCEPTABLE; |
# Not in a course. |
| |
$env{'user.error.msg'}="/adm/grades::vgr:0:0:Cannot display grades page outside course context"; |
| |
return HTTP_NOT_ACCEPTABLE; |
| |
} |
| } elsif (!%perm) { |
} elsif (!%perm) { |
| $request->internal_redirect('/adm/quickgrades'); |
$request->internal_redirect('/adm/quickgrades'); |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to grades.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework