--- loncom/interface/lonmenu.pm 2009/05/08 16:08:56 1.263
+++ 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.263 2009/05/08 16:08:56 droeschl Exp $
+# $Id: lonmenu.pm,v 1.265 2009/05/16 18:06:41 tempelho Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -381,7 +381,6 @@ $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} ++;
}