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

[raeburn]

raeburn		Fri Feb 26 22:56:01 2010 EDT

  Modified files:              
    /loncom/interface	loncoursequeueadmin.pm 
  Log:
  - $logmsg passed to &coursecreation is a ref to a scalar.
     - can be passed directly to &batchcreatecourse::build_course().
  
  
Index: loncom/interface/loncoursequeueadmin.pm
diff -u loncom/interface/loncoursequeueadmin.pm:1.20 loncom/interface/loncoursequeueadmin.pm:1.21
--- loncom/interface/loncoursequeueadmin.pm:1.20	Mon Feb 22 09:47:56 2010
+++ loncom/interface/loncoursequeueadmin.pm	Fri Feb 26 22:56:01 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Utilities to administer domain course requests and course self-enroll requests
 #
-# $Id: loncoursequeueadmin.pm,v 1.20 2010/02/22 09:47:56 bisitz Exp $
+# $Id: loncoursequeueadmin.pm,v 1.21 2010/02/26 22:56:01 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -960,7 +960,7 @@
     }
     my %reqdetails = &build_batchcreatehash($dom,$context,$details,$owneremail,$domdefs);
     my $cid = &LONCAPA::batchcreatecourse::build_course($dom,$cnum,'requestcourses',
-                  \%reqdetails,$longroles,\$logmsg,\$newusermsg,\$addresult,
+                  \%reqdetails,$longroles,$logmsg,\$newusermsg,\$addresult,
                   \$enrollcount,\$output,\$keysmsg,$ownerdom,$ownername,$cnum,$crstype);
     if ($cid eq "/$dom/$cnum") {
         $result = 'created';