--- loncom/interface/loncoursequeueadmin.pm 2009/08/20 20:43:08 1.5
+++ loncom/interface/loncoursequeueadmin.pm 2009/08/27 00:06:18 1.7
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Utilities to administer domain course requests and course self-enroll requests
#
-# $Id: loncoursequeueadmin.pm,v 1.5 2009/08/20 20:43:08 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.7 2009/08/27 00:06:18 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -220,7 +220,7 @@ sub display_queued_requests {
} else {
$formaction = '/adm/createcourse';
$namespace = 'courserequestqueue';
- %requesthash = &Apache::lonnet::dump_dom($namespace,$dom,undef,'_approval');
+ %requesthash = &Apache::lonnet::dump_dom($namespace,$dom,'_approval');
$nextelement = '';
}
my ($output,%queue_by_date,%crstypes);
@@ -293,8 +293,8 @@ sub display_queued_requests {
} else {
my ($cnum,$ownername,$ownerdom,$type,$cdesc)=split(/:/,$request,5);
- $detailslink=''.$cdesc.'';
+ $detailslink=''.$cdesc.'';
$crstype = $type;
if (defined($crstypes{$type})) {
$crstype = $crstypes{$type};
@@ -380,7 +380,7 @@ sub update_request_queue {
$domdesc = &Apache::lonnet::domain($cdom);
$namespace = 'courserequestqueue';
$beneficiary = 'courserequestor';
- %requesthash = &Apache::lonnet::dump_dom($namespace,$cdom,undef,'_approval');
+ %requesthash = &Apache::lonnet::dump_dom($namespace,$cdom,'_approval');
my $chome = &Apache::lonnet::domain($cdom,'primary');
$hostname = &Apache::lonnet::hostname($chome);
$protocol = $Apache::lonnet::protocol{$chome};