Diff for /loncom/interface/lonparmset.pm between versions 1.416 and 1.417

version 1.416, 2008/11/19 21:14:42 version 1.417, 2008/12/01 18:13:55
Line 3756  ENDMAINFORMHEAD Line 3756  ENDMAINFORMHEAD
     my $vgr  = &Apache::lonnet::allowed('vgr',$env{'request.course.id'});      my $vgr  = &Apache::lonnet::allowed('vgr',$env{'request.course.id'});
     my $mgr  = &Apache::lonnet::allowed('mgr',$env{'request.course.id'});      my $mgr  = &Apache::lonnet::allowed('mgr',$env{'request.course.id'});
   
   
     my @menu =      my @menu =
         ( { categorytitle=>'Settings for Your Course',          ( { categorytitle=>'Settings for this Course',
     items => [      items => [
   { linktext => 'Set Course Environment',    { linktext => 'Course Environment',
     url => '/adm/parmset?action=crsenv',      url => '/adm/parmset?action=crsenv',
     permission => $parm_permission,      permission => $parm_permission,
     help => 'Course_Environment',      linktitle =>'Edit environment settings for this course.'  ,
       icon => 'preferences-desktop-remote-desktop.png'  ,
       #help => 'Course_Environment',
     },      },
   { linktext => 'Set Portfolio Metadata',    { linktext => 'Portfolio Metadata',
     url => '/adm/parmset?action=setrestrictmeta',      url => '/adm/parmset?action=setrestrictmeta',
     permission => $parm_permission,      permission => $parm_permission,
       linktitle => 'Restrict metadata for this course.' ,
       icon =>'contact-new.png'   ,
     },      },
   { linktext => 'Manage Course Slots',    { linktext => 'Manage Course Slots',
     url => '/adm/slotrequest?command=showslots',      url => '/adm/slotrequest?command=showslots',
     permission => $vgr,      permission => $vgr,
       linktitle =>'Manage slots for this course.'  ,
       icon => 'format-justify-fill.png'  ,
     },      },
   { linktext => 'Reset Student Access Times',    { linktext => 'Reset Student Access Times',
     url => '/adm/helper/resettimes.helper',      url => '/adm/helper/resettimes.helper',
     permission => $mgr,      permission => $mgr,
       linktitle =>'Reset access times for folders/maps, resources or the course.'  ,
       icon => 'start-here.png'  ,
     },      },
   
   { linktext => 'Set Parameter Setting Default Actions',    { linktext => 'Set Parameter Setting Default Actions',
     url => '/adm/parmset?action=setdefaults',      url => '/adm/parmset?action=setdefaults',
     permission => $parm_permission,      permission => $parm_permission,
       linktitle =>'Set default actions for parameters.'  ,
       icon => 'folder-new.png'  ,
     }]},                }]},          
   { categorytitle => 'New and Existing Parameter Settings for Your Resources',    { categorytitle => 'New and Existing Parameter Settings for Resources',
     items => [      items => [
   { linktext => 'Set/Modify Resource Parameters - Helper Mode',    { linktext => 'Edit Resource Parameters - Helper Mode',
     url => '/adm/helper/parameter.helper',      url => '/adm/helper/parameter.helper',
     permission => $parm_permission,      permission => $parm_permission,
     help => 'Parameter_Helper',      linktitle =>'Set/Modify resource parameters in helper mode.'  ,
       icon => 'dialog-information.png'  ,
       #help => 'Parameter_Helper',
     },      },
   { linktext => 'Set/Modify Resource Parameters - Overview Mode',    { linktext => 'Edit Resource Parameters - Overview Mode',
     url => '/adm/parmset?action=newoverview',      url => '/adm/parmset?action=newoverview',
     permission => $parm_permission,      permission => $parm_permission,
     help => 'Parameter_Overview',      linktitle =>'Set/Modify resource parameters in overview mode.'  ,
       icon => 'edit-find.png'  ,
       #help => 'Parameter_Overview',
     },      },
   { linktext => 'Set/Modify Resource Parameters - Table Mode',    { linktext => 'Edit Resource Parameters - Table Mode',
     url => '/adm/parmset?action=settable',      url => '/adm/parmset?action=settable',
     permission => $parm_permission,      permission => $parm_permission,
     help => 'Table_Mode',      linktitle =>'Set/Modify resource parameters in table mode.'  ,
       icon => 'edit-copy.png'  ,
       #help => 'Table_Mode',
     }]},      }]},
            { categorytitle => 'Existing Parameter Settings for Your Resources',             { categorytitle => 'Existing Parameter Settings for Resources',
      items => [       items => [
   { linktext => 'Modify Resource Parameters - Overview Mode',    { linktext => 'Modify Resource Parameters - Overview Mode',
     url => '/adm/parmset?action=setoverview',      url => '/adm/parmset?action=setoverview',
     permission => $parm_permission,      permission => $parm_permission,
     help => 'Parameter_Overview',      linktitle =>'Set/Modify existing resource parameters in overview mode.'  ,
       icon => 'preferences-desktop-wallpaper.png'  ,
       #help => 'Parameter_Overview',
     },                },          
   { linktext => 'Parameter Change Log and Course Blog Posting/User Notification',    { linktext => 'Change Log',
     url => '/adm/parmset?action=parameterchangelog',      url => '/adm/parmset?action=parameterchangelog',
     permission => $parm_permission,      permission => $parm_permission,
       linktitle =>'View parameter and course blog posting/user notification change log.'  ,
       icon => 'emblem-system.png'   ,
     }]}      }]}
           );            );
 #---- Remove when done ----  
 #    my $menu_html = '';  
 #    foreach my $menu_item (@menu) {  
 # if ($menu_item->{'categorytitle'}) {  
 #    $menu_html .= '<h3>'.&mt($menu_item->{'categorytitle'}).'</h3>';  
 #    next;  
 # }  
 #        next if (! $menu_item->{'permission'});  
 #        $menu_html.='<p>';  
 #        $menu_html.='<span class="LC_parm_menu_item">';  
 #        if (exists($menu_item->{'url'})) {  
 #            $menu_html.=qq{<a href="$menu_item->{'url'}">};  
 #        } else {  
 #            $menu_html.=  
 #                qq{<a href="/adm/parmset?action=$menu_item->{'action'}">};  
 #        }  
 #        $menu_html.= &mt($menu_item->{'linktext'}).'</a></span>';  
 #        if (exists($menu_item->{'help'})) {  
 #            $menu_html.=  
 #                &Apache::loncommon::help_open_topic($menu_item->{'help'});  
 #        }  
 #        $menu_html.='</p>'.$/;  
 #    }  
 # --------------------------  
   
     $r->print(&Apache::lonhtmlcommon::generate_menu(@menu));      $r->print(&Apache::lonhtmlcommon::generate_menu(@menu));
     return;      return;
 }  }

Removed from v.1.416  
changed lines
  Added in v.1.417


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>