--- loncom/interface/lonmodifycourse.pm 2008/10/27 14:32:30 1.40
+++ loncom/interface/lonmodifycourse.pm 2009/05/08 17:22:17 1.44
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# handler for DC-only modifiable course settings
#
-# $Id: lonmodifycourse.pm,v 1.40 2008/10/27 14:32:30 bisitz Exp $
+# $Id: lonmodifycourse.pm,v 1.44 2009/05/08 17:22:17 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -118,8 +118,9 @@ sub print_course_search_page {
&print_header($r);
my $filterlist = ['descriptfilter',
'instcodefilter','ownerfilter',
- 'ownerdomfilter','coursefilter'];
+ 'coursefilter'];
my $filter = {};
+ my $numtitles;
my $type = 'Course';
my $action = '/adm/modifycourse';
my $cctitle = &Apache::lonnet::plaintext('cc',$type);
@@ -131,7 +132,7 @@ sub print_course_search_page {
'
'.&mt('View or modify course settings which only a [_1] may modify.'
,$dctitle).''."\n".'');
$r->print(&Apache::lonpickcourse::build_filters($filterlist,$type,
- undef,undef,$filter,$action,'modifycourse'));
+ undef,undef,$filter,$action,\$numtitles,'modifycourse'));
}
sub print_course_selection_page {
@@ -155,7 +156,7 @@ sub print_course_selection_page {
$filter{'domainfilter'} = $dom;
my %courses = &Apache::lonpickcourse::search_courses($r,$type,0,
\%filter);
- &Apache::lonpickcourse::display_matched_courses($r,$type,0,$action,
+ &Apache::lonpickcourse::display_matched_courses($r,$type,0,$action,undef,
%courses);
return;
}
@@ -173,7 +174,7 @@ sub print_modification_menu {
);
my @menu =
(
- { text => 'Modify quota for group portfolio files',
+ { text => 'Modify quota for group portfolio',
phase => 'setquota',
},
{ text => 'Display current settings for automated enrollment',
@@ -269,7 +270,7 @@ sub print_settings_display {
$disp_table .= &Apache::loncommon::end_data_table()."\n";
&print_header($r,$cdesc);
$r->print('
-'.$lt{'caes'}.'
+'.$lt{'caes'}.$cdesc.'