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

raeburn raeburn@source.lon-capa.org
Tue, 07 Dec 2010 04:20:04 -0000


raeburn		Mon Dec  6 23:20:04 2010 EDT

  Modified files:              
    /loncom/interface	loncoursequeueadmin.pm 
  Log:
  - Customization for GCI_3.
    - Backport 1.25.
  
Index: loncom/interface/loncoursequeueadmin.pm
diff -u loncom/interface/loncoursequeueadmin.pm:1.12.2.10 loncom/interface/loncoursequeueadmin.pm:1.12.2.11
--- loncom/interface/loncoursequeueadmin.pm:1.12.2.10   Sun Dec  5 21:57:33 2010
+++ loncom/interface/loncoursequeueadmin.pm     Tue Dec  7 04:19:59 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Utilities to administer domain course requests and course self-enroll requests 
 #
-# $Id: loncoursequeueadmin.pm,v 1.12.2.10 2010/12/05 21:57:33 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.12.2.11 2010/12/07 04:19:59 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -466,7 +466,7 @@
             my $uhome = &Apache::lonnet::homeserver($uname,$udom);
             if ($uhome ne 'no_host') {
                 if (exists($requesthash{$uname.':'.$udom})) {
-                    if ($cdom ne '' && ref($allnums{$cdom} eq 'HASH') {
+                    if (($cdom ne '') && (ref($allnums{$cdom}) eq 'HASH')) {
                         my ($addothers,@others);
                         foreach my $key (%{$allnums{$cdom}}) {
                             if ($key eq $cnum) {