--- loncom/interface/lonmenu.pm 2009/05/06 12:13:18 1.262
+++ loncom/interface/lonmenu.pm 2009/05/16 18:06:41 1.265
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines to control the menu
#
-# $Id: lonmenu.pm,v 1.262 2009/05/06 12:13:18 raeburn Exp $
+# $Id: lonmenu.pm,v 1.265 2009/05/16 18:06:41 tempelho Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -369,19 +369,18 @@ $utility
$helplink
$lt{'exit'}
-
+
- $lt{'main'}
$reloadlink
$navmaps
$docs
$groups
$role_selector
-
+
$form
-
$reg
ENDINLINEMENU
} else {
@@ -1644,7 +1643,7 @@ sub roles_selector {
}
}
if ($is_cc) {
- &get_all_courseroles($cdom,$cnum,\%courseroles,\%seccount);
+ &get_all_courseroles($cdom,$cnum,\%courseroles,\%seccount);
} else {
my %gotnosection;
foreach my $item (keys(%env)) {
@@ -1662,7 +1661,7 @@ sub roles_selector {
}
if (ref($courseroles{$role}) eq 'ARRAY') {
if ($sec ne '') {
- if (!grep(/^Q$sec\E$/,@{$courseroles{$role}})) {
+ if (!grep(/^\Q$sec\E$/,@{$courseroles{$role}})) {
push(@{$courseroles{$role}},$sec);
$seccount{$role} ++;
}