version 1.19, 2002/04/06 21:07:08
|
version 1.20, 2002/04/09 03:56:29
|
Line 423 sub handler {
|
Line 423 sub handler {
|
} else { |
} else { |
$Apache::grades::viewgrades=&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'}); |
$Apache::grades::viewgrades=&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'}); |
if ($command eq 'submission') { |
if ($command eq 'submission') { |
$request->print(&listStudents($request)) if ($ENV{'form.student'} eq ''); |
&listStudents($request) if ($ENV{'form.student'} eq ''); |
$request->print(&submission($request)) if ($ENV{'form.student'} ne ''); |
$request->print(&submission($request)) if ($ENV{'form.student'} ne ''); |
} elsif ($command eq 'viewgrades') { |
} elsif ($command eq 'viewgrades') { |
$request->print(&viewgrades($request)); |
$request->print(&viewgrades($request)); |