--- loncom/interface/courseprefs.pm 2011/01/15 03:10:54 1.44
+++ loncom/interface/courseprefs.pm 2011/12/14 23:55:50 1.48
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set configuration settings for a course
#
-# $Id: courseprefs.pm,v 1.44 2011/01/15 03:10:54 www Exp $
+# $Id: courseprefs.pm,v 1.48 2011/12/14 23:55:50 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -509,15 +509,15 @@ sub handler {
my @allitems = &get_allitems(%prefs);
&Apache::lonconfigsettings::make_changes($r,$cdom,$phase,$context,
\@prefs_order,\%prefs,\%values,
- $cnum,undef,\@allitems);
+ $cnum,undef,\@allitems,'coursepref');
} elsif ($phase eq 'display') {
my $jscript = &get_jscript($cid,$cdom,$phase,$crstype);
my @allitems = &get_allitems(%prefs);
&Apache::lonconfigsettings::display_settings($r,$cdom,$phase,$context,
- \@prefs_order,\%prefs,\%values,undef,$jscript,\@allitems,$crstype);
+ \@prefs_order,\%prefs,\%values,undef,$jscript,\@allitems,$crstype,'coursepref');
} else {
&Apache::lonconfigsettings::display_choices($r,$phase,$context,
- \@prefs_order,\%prefs);
+ \@prefs_order,\%prefs,'coursepref');
}
return OK;
}
@@ -544,11 +544,16 @@ sub print_config_box {
my $itemtext = $item->{'itemtext'};
my $rowtotal = 0;
my $output =
- '
- '.
- &Apache::loncommon::help_open_topic($item->{'help'}).'';
+ '
+
+ '.
+ &mt($item->{text}).' '.
+ &Apache::loncommon::help_open_topic($item->{'help'}).' | '."\n".
+ '
';
if (($action eq 'feedback') || ($action eq 'classlists')) {
$output .= '
+
+
';
if (exists $item->{'header'}->[0]->{'col1'} ||
exists $item->{'header'}->[0]->{'col2'}) {
@@ -566,6 +571,10 @@ sub print_config_box {
}
$output .= '
+ |
+
+
+
'.&mt($item->{'header'}->[1]->{'col1'}).' | ';
@@ -576,6 +585,10 @@ sub print_config_box {
$output .= &print_classlists('middle',$cdom,$settings,$itemtext,\$rowtotal,$crstype).
'
+ |
+
+
+
';
if (exists $item->{'header'}->[2]->{'col1'} ||
exists $item->{'header'}->[2]->{'col2'}) {
@@ -588,6 +601,8 @@ sub print_config_box {
}
} else {
$output .= '
+
+
';
if (exists $item->{'header'}->[0]->{'col1'} ||
exists $item->{'header'}->[0]->{'col2'}) {
@@ -624,7 +639,9 @@ sub print_config_box {
}
$output .= '
-';
+ |
+
+ ';
return ($output,$rowtotal);
}
@@ -1346,9 +1363,9 @@ sub store_changes {
$output .= '';
} else {
if ($crstype eq 'Community') {
- $output = &mt('No changes made to community settings.');
+ $output .= &mt('No changes made to community settings.');
} else {
- $output = &mt('No changes made to course settings.');
+ $output .= &mt('No changes made to course settings.');
}
}
}
@@ -2375,7 +2392,7 @@ sub show_contents_view {
}
$r->print(&Apache::loncommon::start_data_table_row().
' | '.$indent.$icon.' '.$title.' | ');
- &releases_by_map($r,$bymap,$url,$scopeorder);
+ &releases_by_map($r,$bymap,$url,$scopeorder,$lt);
$r->print(&Apache::loncommon::end_data_table_row());
} else {
my $rowspan;