--- loncom/interface/slotrequest.pm 2005/09/06 20:54:58 1.11 +++ loncom/interface/slotrequest.pm 2005/09/09 18:27:56 1.13 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler for requesting to have slots added to a students record # -# $Id: slotrequest.pm,v 1.11 2005/09/06 20:54:58 albertel Exp $ +# $Id: slotrequest.pm,v 1.13 2005/09/09 18:27:56 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -473,7 +473,7 @@ sub show_table { (keys(%slots))) { if (defined($slots{$slot}->{'type'}) && $slots{$slot}->{'type'} ne 'schedulable_student') { - next; + #next; } my $description=&get_description($slot,$slots{$slot}); my %consumed=&Apache::lonnet::dump('slot_reservations',$cdom,$cnum, @@ -514,6 +514,7 @@ sub handler { return OK; } $env{'request.symb'}=$symb; + my $vgr=&Apache::lonnet::allowed('vgr',$env{'request.course.id'}); if ($env{'form.command'} eq 'showslots' && $vgr eq 'F') { &show_table($r,$symb); } else { @@ -524,7 +525,6 @@ sub handler { &fail($r,'not_allowed'); return OK; } - my $vgr=&Apache::lonnet::allowed('vgr',$env{'request.course.id'}); if ($env{'form.requestattempt'}) { &show_choices($r,$symb); } elsif ($env{'form.command'} eq 'release') {