--- loncom/interface/loncreatecourse.pm 2010/05/24 06:36:54 1.139
+++ loncom/interface/loncreatecourse.pm 2010/09/20 00:51:14 1.144
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.139 2010/05/24 06:36:54 raeburn Exp $
+# $Id: loncreatecourse.pm,v 1.144 2010/09/20 00:51:14 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -689,7 +689,7 @@ sub create_course {
'
'.&mt('Manage Access Keys').'
');
}
# Flush the course logs so reverse user roles immediately updated
- &Apache::lonnet::flushcourselogs();
+ $r->register_cleanup(\&Apache::lonnet::flushcourselogs);
$r->print(''.&mt('Roles will be active at next login').'.
');
}
$r->print(''.
@@ -716,7 +716,7 @@ sub print_intro_page {
url => '/adm/createcourse?phase=courseone',
permission => 1,
#help => '',
- icon => 'ccrs.png',
+ icon => 'crsnew.png',
linktitle => 'Create a new course by completing an online form.'
},
{
@@ -724,7 +724,7 @@ sub print_intro_page {
url => '/adm/createcourse?phase=groupone',
permission => $show_all_choices,
#help => '',
- icon => 'ccrs.png',
+ icon => 'crsnew.png',
linktitle => 'Create a new collaborative community by completing an online form.'
},
{
@@ -732,7 +732,7 @@ sub print_intro_page {
url => '/adm/createcourse?phase=batchone',
permission => 1,
help => 'Batch_Creation',
- icon => 'ccrs.png',
+ icon => 'uplcrs.png',
linktitle => 'Upload an attributes file containing specifications for one or more courses or communities in XML format.'
},
]
@@ -744,15 +744,16 @@ sub print_intro_page {
url => '/adm/createcourse?phase=requestdisplay',
permission => $show_all_choices,
#help => '',
- icon => 'ccrs.png',
+ icon => 'rcrs.png',
linktitle => 'Display course and community creation requests submitted by authorized users, held pending approval by a Domain Coordinator.'
},
{
- linktext => 'Display official course requests',
+ linktext => 'View pending official course requests',
url => '/adm/createcourse?phase=pendingdisplay',
permission => $show_all_choices,
#help => '',
- icon => 'ccrs.png',
+ icon => 'edit-find.png',
+ alttext => '',
linktitle => 'Display official course requests submitted by authorized users, held pending validation of instructor status.'
},
]
@@ -931,7 +932,7 @@ sub print_creation_logs {
if ($numtitles) {
if (($curr{'type'} eq 'official') || ($curr{'type'} eq 'unofficial')) {
$instcodefilter = &instcode_srchstr($dom,$numtitles);
- &Apache::courseclassifier::instcode_search_str($dom,$numtitles);
+ &Apache::courseclassifier::instcode_search_str($dom,$numtitles,\@codetitles);
if ($curr{'type'} eq 'official') {
$regexpok = 1;
} else {