--- loncom/interface/lonparmset.pm	2005/11/17 20:04:05	1.267
+++ loncom/interface/lonparmset.pm	2005/11/21 22:00:11	1.268
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.267 2005/11/17 20:04:05 albertel Exp $
+# $Id: lonparmset.pm,v 1.268 2005/11/21 22:00:11 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2692,6 +2692,8 @@ ENDMAINFORMHEAD
 #
     my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
     my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
+    my $vgr  = &Apache::lonnet::allowed('vgr',$env{'request.course.id'});
+
     my @menu =
         (
           { text => 'Set Course Environment Parameters',
@@ -2702,6 +2704,12 @@ ENDMAINFORMHEAD
 	    action => 'setrestrictmeta',
             permission => $parm_permission,
             },
+	  { text => 'Manange Course Slots',
+	    url => '/adm/slotrequest?command=showslots',
+	    permission => $vgr,
+            },
+	  { divider => 1,
+	    },
           { text => 'Set/Modify Resource Parameters - Helper Mode',
             url => '/adm/helper/parameter.helper',
             permission => $parm_permission,
@@ -2726,6 +2734,10 @@ ENDMAINFORMHEAD
           );
     my $menu_html = '';
     foreach my $menu_item (@menu) {
+	if ($menu_item->{'divider'}) {
+	    $menu_html .= '<hr />';
+	    next;
+	}
         next if (! $menu_item->{'permission'});
         $menu_html.='<p>';
         $menu_html.='<font size="+1">';