version 1.11, 2005/09/06 20:54:58
|
version 1.12, 2005/09/06 21:31:03
|
Line 514 sub handler {
|
Line 514 sub handler {
|
return OK; |
return OK; |
} |
} |
$env{'request.symb'}=$symb; |
$env{'request.symb'}=$symb; |
|
my $vgr=&Apache::lonnet::allowed('vgr',$env{'request.course.id'}); |
if ($env{'form.command'} eq 'showslots' && $vgr eq 'F') { |
if ($env{'form.command'} eq 'showslots' && $vgr eq 'F') { |
&show_table($r,$symb); |
&show_table($r,$symb); |
} else { |
} else { |
Line 524 sub handler {
|
Line 525 sub handler {
|
&fail($r,'not_allowed'); |
&fail($r,'not_allowed'); |
return OK; |
return OK; |
} |
} |
my $vgr=&Apache::lonnet::allowed('vgr',$env{'request.course.id'}); |
|
if ($env{'form.requestattempt'}) { |
if ($env{'form.requestattempt'}) { |
&show_choices($r,$symb); |
&show_choices($r,$symb); |
} elsif ($env{'form.command'} eq 'release') { |
} elsif ($env{'form.command'} eq 'release') { |