--- loncom/interface/loncoursequeueadmin.pm 2010/03/30 15:23:51 1.23
+++ loncom/interface/loncoursequeueadmin.pm 2010/03/30 16:02:27 1.24
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Utilities to administer domain course requests and course self-enroll requests
#
-# $Id: loncoursequeueadmin.pm,v 1.23 2010/03/30 15:23:51 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.24 2010/03/30 16:02:27 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -260,11 +260,13 @@ sub display_queued_requests {
$formaction = '/adm/createcourse';
$namespace = 'courserequestqueue';
my $disposition = 'approval';
+ my $nextphase = 'requestchange';
if ($context eq 'pending') {
$disposition = 'pending';
+ $nextphase = 'requestvalidation';
}
%requesthash = &Apache::lonnet::dump_dom($namespace,$dom,'_'.$disposition);
- $nextelement = '';
+ $nextelement = '';
}
my ($output,%queue_by_date);
if (keys(%requesthash) > 0) {
@@ -322,8 +324,8 @@ sub display_queued_requests {
$output .= '';
}
if ($context eq 'pending') {
- $output .= '
'."\n".
+ $output .= '
'."\n".
'
'.&mt('Any course/community requests which are successfully validated will be created immediately.').' '.&mt('Unvalidated requests will be listed for manual approval/rejection.').'
'; } else { $output .= '