[LON-CAPA-cvs] cvs: loncom /interface lonmenu.pm

raeburn raeburn@source.lon-capa.org
Wed, 13 May 2009 03:21:14 -0000


raeburn		Wed May 13 03:21:14 2009 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  - Fix typo.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.263 loncom/interface/lonmenu.pm:1.264
--- loncom/interface/lonmenu.pm:1.263	Fri May  8 16:08:56 2009
+++ loncom/interface/lonmenu.pm	Wed May 13 03:21:14 2009
@@ -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.264 2009/05/13 03:21:14 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1644,7 +1644,7 @@
         }
     }
     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 +1662,7 @@
                 }
                 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} ++;
                         }