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

raeburn raeburn@source.lon-capa.org
Thu, 07 Jan 2010 17:07:45 -0000


raeburn		Thu Jan  7 17:07:45 2010 EDT

  Modified files:              (Branch: GCI_3)
    /loncom/interface	loncoursequeueadmin.pm 
  Log:
  - Order of args when calling &enable_gci_submission() now matches expected order. 
  
  
Index: loncom/interface/loncoursequeueadmin.pm
diff -u loncom/interface/loncoursequeueadmin.pm:1.12.2.3 loncom/interface/loncoursequeueadmin.pm:1.12.2.4
--- loncom/interface/loncoursequeueadmin.pm:1.12.2.3	Sun Dec 20 02:05:57 2009
+++ loncom/interface/loncoursequeueadmin.pm	Thu Jan  7 17:07:45 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.3 2009/12/20 02:05:57 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.12.2.4 2010/01/07 17:07:45 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -457,8 +457,8 @@
             if ($uhome ne 'no_host') {
                 if (exists($requesthash{$uname.':'.$udom})) {
                     if ($cdom eq 'gci' && $cnum eq '9615072b469884921gcil1') {
-                        my $enresult = &enable_gci_submission($uname,$udom,
-                                                   $access_start,$access_end);
+                        my $enresult = &enable_gci_submission($udom,$uname,
+                                                   $access_end,$access_start);
                     }
                     if (exists($classlist->{$uname.':'.$udom})) {
                         if (ref($classlist->{$uname.':'.$udom}) eq 'ARRAY') {