--- loncom/interface/loncoursequeueadmin.pm 2010/01/16 16:15:08 1.15
+++ loncom/interface/loncoursequeueadmin.pm 2010/01/18 15:53:27 1.16
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Utilities to administer domain course requests and course self-enroll requests
#
-# $Id: loncoursequeueadmin.pm,v 1.15 2010/01/16 16:15:08 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.16 2010/01/18 15:53:27 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1149,7 +1149,6 @@ sub queued_selfenrollment {
}
}
if (keys(%reqs_by_date)) {
- my $rolename = &Apache::lonnet::plaintext('st');
unless ($notitle) {
$output .= ''.&mt('Enrollment requests pending Course Coordinator approval').'
';
}
@@ -1164,6 +1163,7 @@ sub queued_selfenrollment {
foreach my $crs (@{$reqs_by_date{$item}}) {
my %courseinfo = &Apache::lonnet::coursedescription($crs);
my $usec = $selfenrollrequests{$crs}{'section'};
+ my $rolename = &Apache::lonnet::plaintext('st',$courseinfo{'type'},$crs);
if ($usec eq '') {
$usec = &mt('No section');
}