--- loncom/interface/lonmodifycourse.pm 2008/06/30 04:14:40 1.39 +++ loncom/interface/lonmodifycourse.pm 2009/03/08 21:49:33 1.43 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # handler for DC-only modifiable course settings # -# $Id: lonmodifycourse.pm,v 1.39 2008/06/30 04:14:40 raeburn Exp $ +# $Id: lonmodifycourse.pm,v 1.43 2009/03/08 21:49:33 weissno Exp $ # # Copyright Michigan State University Board of Trustees # @@ -173,7 +173,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 +269,7 @@ sub print_settings_display { $disp_table .= &Apache::loncommon::end_data_table()."\n"; &print_header($r,$cdesc); $r->print(' -

'.$lt{'caes'}.'

+

'.$lt{'caes'}.$cdesc.'

'.$lt{'cose'}.' @@ -290,10 +290,10 @@ sub print_setquota { my $cctitle = &Apache::lonnet::plaintext('cc',$type); my $subdiv = &mt('Although a [_1] will assign the disk quota for each individual group, the size of the quota is constrained by the total disk space allocated by the [_2] for portfolio files in a course.',$cctitle,$dctitle); my %lt = &Apache::lonlocal::texthash( - 'cquo' => 'Disk space for storage of group portfolio files', + 'cquo' => 'Disk space for storage of group portfolio', 'gpqu' => 'Course portfolio files disk space', 'each' => 'Each course group can be assigned a quota for portfolio files uploaded to the group.', - 'modi' => 'Modify quota', + 'modi' => 'Save', 'back' => "Back to options page", ); my %settings = &Apache::lonnet::get('environment',['internal.coursequota'],$cdom,$cnum); @@ -341,7 +341,7 @@ sub print_catsettings { $excludeoff = ''; } $r->print('

'.&mt('Visibility in Course Catalog').'

'. - &mt("Unless excluded, a course is listed in this domain's publicly accessible course catalog, if at least of one the following applies").':