version 1.18, 2010/01/07 20:33:22
|
version 1.22, 2010/01/27 13:08:01
|
Line 115 sub handler {
|
Line 115 sub handler {
|
%lt = ( |
%lt = ( |
conf => 'Course Configuration', |
conf => 'Course Configuration', |
edit => 'Edit Course Configuration', |
edit => 'Edit Course Configuration', |
gens => 'General Settings', |
gens => 'General course settings', |
idnu => 'ID/Number', |
idnu => 'Course ID or number', |
desc => 'Title', |
desc => 'Course Description', |
catg => 'Categorize course', |
catg => 'Categorize course', |
excc => 'Exclude from course catalog', |
excc => 'Exclude from course catalog', |
clon => 'Users allowed to clone course', |
clon => 'Users allowed to clone course', |
rept => 'Replacement titles for standard course roles', |
rept => 'Replacement titles for standard course roles', |
time => 'Timezone', |
time => 'Timezone in which the course takes place', |
date => 'Calendar Locale', |
date => 'Locale used for course calendar', |
coco => 'Course Content', |
coco => 'Course Content', |
copo => 'Course Policy', |
copo => 'Course Policy', |
priv => 'Domain Coordinators in course', |
priv => 'Domain Coordinators in course', |
Line 163 sub handler {
|
Line 163 sub handler {
|
help => 'Course_Environment', |
help => 'Course_Environment', |
ordered => ['description','courseid','categories', |
ordered => ['description','courseid','categories', |
'hidefromcat','externalsyllabus', |
'hidefromcat','externalsyllabus', |
'url','rolenames','cloners'], |
'cloners','url','rolenames'], |
itemtext => { |
itemtext => { |
description => $lt{'desc'}, |
description => $lt{'desc'}, |
courseid => $lt{'idnu'}, |
courseid => $lt{'idnu'}, |
categories => $lt{'catg'}, |
categories => $lt{'catg'}, |
hidefromcat => $lt{'excc'}, |
hidefromcat => $lt{'excc'}, |
cloners => $lt{'clon'}, |
cloners => $lt{'clon'}, |
externalsyllabus => 'External Syllabus URL', |
externalsyllabus => 'URL of Syllabus', |
url => 'Top Level Map', |
url => 'Top Level Map', |
rolenames => $lt{'rept'}, |
rolenames => $lt{'rept'}, |
}, |
}, |
Line 180 sub handler {
|
Line 180 sub handler {
|
help => 'Course_Environment', |
help => 'Course_Environment', |
ordered => ['languages','timezone','datelocale'], |
ordered => ['languages','timezone','datelocale'], |
itemtext => { |
itemtext => { |
languages => 'Language(s)', |
languages => 'Languages used', |
timezone => $lt{'time'}, |
timezone => $lt{'time'}, |
datelocale => $lt{'date'}, |
datelocale => $lt{'date'}, |
}, |
}, |
}, |
}, |
'feedback' => |
'feedback' => |
{ text => 'Feedback Messages', |
{ text => 'Feedback messages', |
help => 'Course_Environment', |
help => 'Course_Environment', |
header => [{col1 => 'Questions about:', |
header => [{col1 => 'Questions about:', |
col2 => 'Recipients'}, |
col2 => 'Recipients'}], |
{col1 => 'Questions about:', |
|
col2 => 'Custom Text'}], |
|
ordered => ['question.email','comment.email','policy.email'], |
ordered => ['question.email','comment.email','policy.email'], |
itemtext => { |
itemtext => { |
'question.email' => 'Resource Content', |
'question.email' => 'Resource Content', |
Line 207 sub handler {
|
Line 205 sub handler {
|
'allow_limited_html_in_feedback', |
'allow_limited_html_in_feedback', |
'allow_discussion_post_editing'], |
'allow_discussion_post_editing'], |
itemtext => { |
itemtext => { |
'plc.roles.denied' => 'Disable resource discussion', |
'plc.roles.denied' => 'No Resource Discussion', |
'plc.users.denied' => 'Disable resource discussion', |
'plc.users.denied' => 'No Resource Discussion', |
'pch.roles.denied' => 'Disable chat room', |
'pch.roles.denied' => 'No Chat room use', |
'pch.users.denied' => 'Disable chat room', |
'pch.users.denied' => 'No Chat room use', |
allow_limited_html_in_feedback => 'HTML in discussion', |
allow_limited_html_in_feedback => 'Allow limited HTML in discussion', |
allow_discussion_post_editing => 'Allow users to edit/delete own discussion posts', |
allow_discussion_post_editing => 'Users can edit/delete own discussion posts', |
}, |
}, |
}, |
}, |
'classlists' => |
'classlists' => |
Line 238 sub handler {
|
Line 236 sub handler {
|
}, |
}, |
}, |
}, |
'appearance' => |
'appearance' => |
{ text => 'Display of Resources ', |
{ text => 'Display of resources ', |
help => 'Course_Environment', |
help => 'Course_Environment', |
ordered => ['default_xml_style','pageseparators', |
ordered => ['default_xml_style','pageseparators', |
'disable_receipt_display','texengine', |
'disable_receipt_display','texengine', |
'tthoptions'], |
'tthoptions'], |
itemtext => { |
itemtext => { |
default_xml_style => 'Default XML style file', |
default_xml_style => 'Default XML style file', |
pageseparators => 'Separate items on composite pages', |
pageseparators => 'Visibly Separate Items on Pages', |
disable_receipt_display => 'Disable problem receipts display', |
disable_receipt_display => 'Disable display of problem receipts', |
texengine => 'Force specific math rendering engine', |
texengine => 'Force use of a specific math rendering engine', |
tthoptions => 'Default set of options to pass to tth/m when converting TeX', |
tthoptions => 'Default set of options to pass to tth/m when converting TeX', |
}, |
}, |
}, |
}, |
Line 257 sub handler {
|
Line 255 sub handler {
|
ordered => ['grading','rndseed', |
ordered => ['grading','rndseed', |
'receiptalg','disablesigfigs'], |
'receiptalg','disablesigfigs'], |
itemtext => { |
itemtext => { |
grading => 'Grading Type', |
grading => 'Grading', |
rndseed => 'Randomization algorithm', |
rndseed => 'Randomization algorithm used', |
receiptalg => 'Receipt algorithm', |
receiptalg => 'Receipt algorithm used', |
disablesigfigs => 'Disable significant figure checks', |
disablesigfigs => 'Disable checking of Significant Figures', |
}, |
}, |
|
|
}, |
}, |
'printouts' => |
'printouts' => |
{ text => 'Printouts', |
{ text => 'Printout generation', |
help => 'Course_Environment', |
help => 'Course_Environment', |
ordered => ['problem_stream_switch','suppress_tries', |
ordered => ['problem_stream_switch','suppress_tries', |
'default_paper_size','print_header_format', |
'default_paper_size','print_header_format', |
Line 864 sub store_changes {
|
Line 862 sub store_changes {
|
$output .= '<h3>'.&mt($prefs->{$item}{'text'}).'</h3>'; |
$output .= '<h3>'.&mt($prefs->{$item}{'text'}).'</h3>'; |
if (ref($changes->{$item}) eq 'HASH') { |
if (ref($changes->{$item}) eq 'HASH') { |
if (keys(%{$changes->{$item}}) > 0) { |
if (keys(%{$changes->{$item}}) > 0) { |
$output .= &mt('Changes made:').'<ul>'; |
$output .= &mt('Changes made:').'<ul style="list-style:none;">'; |
if ($item eq 'other') { |
if ($item eq 'other') { |
foreach my $key (sort(keys(%{$changes->{$item}}))) { |
foreach my $key (sort(keys(%{$changes->{$item}}))) { |
$storehash{$key} = $changes->{$item}{$key}; |
$storehash{$key} = $changes->{$item}{$key}; |
if ($changes->{$item}{$key} eq '') { |
if ($changes->{$item}{$key} eq '') { |
push(@delkeys,$key); |
push(@delkeys,$key); |
$output .= '<li>'.&mt('Deleted setting for [_1]','<i>'.$key.'</i>').'</li>'; |
$output .= '<li>'.&Apache::lonhtmlcommon::confirm_success(&mt('Deleted setting for [_1]','<i>'.$key.'</i>')).'</li>'; |
} else { |
} else { |
$output .= '<li>'.&mt('[_1] set to [_2]','<i>'.$key.'</i>', |
$output .= '<li>'.&Apache::lonhtmlcommon::confirm_success(&mt('[_1] set to [_2]','<i>'.$key.'</i>', |
"'$storehash{$key}'").'</li>'; |
"'$storehash{$key}'")).'</li>'; |
} |
} |
} |
} |
} else { |
} else { |
Line 905 sub store_changes {
|
Line 903 sub store_changes {
|
"'<b>".$newname."</b>'").'</li>'; |
"'<b>".$newname."</b>'").'</li>'; |
} |
} |
if ($msg ne '') { |
if ($msg ne '') { |
$output .= '<li>'.&mt($displayname).'<ul>'.$msg.'</ul></li>'; |
$output .= '<li>'.&Apache::lonhtmlcommon::confirm_success(&mt($displayname)).'<ul class="LC_success">'.$msg.'</ul></li>'; |
} |
} |
} else { |
} else { |
next if (!exists($changes->{$item}{$key})); |
next if (!exists($changes->{$item}{$key})); |
Line 980 sub store_changes {
|
Line 978 sub store_changes {
|
} |
} |
if ($changes->{$item}{$key} eq '') { |
if ($changes->{$item}{$key} eq '') { |
push(@delkeys,$key); |
push(@delkeys,$key); |
$output .= '<li>'.&mt('Deleted setting for [_1]', |
$output .= '<li>'.&Apache::lonhtmlcommon::confirm_success(&mt('Deleted setting for [_1]', |
'<i>'.$displayname.'</i>').'</li>'; |
'<i>'.$displayname.'</i>')).'</li>'; |
} else { |
} else { |
$output .= '<li>'.&mt('[_1] set to [_2]', |
$output .= '<li>'.&Apache::lonhtmlcommon::confirm_success(&mt('[_1] set to [_2]', |
'<i>'.$displayname.'</i>', |
'<i>'.$displayname.'</i>', |
"'<b>$displayval</b>'"); |
"'<b>$displayval</b>'")); |
if ($key eq 'url') { |
if ($key eq 'url') { |
my $bkuptime=time; |
my $bkuptime=time; |
$output .= (' 'x2).&mt('(Previous URL backed up)').': '. |
$output .= (' 'x2).&mt('(Previous URL backed up)').': '. |
Line 1309 sub print_courseinfo {
|
Line 1307 sub print_courseinfo {
|
'</span>', |
'</span>', |
input => 'textbox', |
input => 'textbox', |
size => '40', |
size => '40', |
|
advanced => 1 |
}, |
}, |
'description' => { |
'description' => { |
text => '<b>'.&mt($itemtext->{'description'}).'</b>', |
text => '<b>'.&mt($itemtext->{'description'}).'</b>', |
Line 1326 sub print_courseinfo {
|
Line 1325 sub print_courseinfo {
|
&mt('Coordinators included automatically'), |
&mt('Coordinators included automatically'), |
input => 'textbox', |
input => 'textbox', |
size => '40', |
size => '40', |
|
advanced => 1 |
}, |
}, |
'rolenames' => { |
'rolenames' => { |
text => '<b>'.&mt($itemtext->{'rolenames'}).'</b><br />'. |
text => '<b>'.&mt($itemtext->{'rolenames'}).'</b><br />'. |
'('.$replace.')', |
'('.$replace.')', |
input => 'textbox', |
input => 'textbox', |
size => '20', |
size => '20', |
|
advanced => 1 |
}, |
}, |
'externalsyllabus' => { |
'externalsyllabus' => { |
text => '<b>'.&mt($itemtext->{'externalsyllabus'}).'</b><br />('. |
text => '<b>'.&mt($itemtext->{'externalsyllabus'}).'</b><br />('. |
Line 1360 sub print_courseinfo {
|
Line 1361 sub print_courseinfo {
|
next if (!$can_categorize); |
next if (!$can_categorize); |
} |
} |
$count ++; |
$count ++; |
$datatable .= &item_table_row_start($items{$item}{text},$count); |
if (exists $items{$item}{advanced} && $items{$item}{advanced} == 1) { |
|
$datatable .= &item_table_row_start($items{$item}{text},$count,"advanced"); |
|
} else { |
|
$datatable .= &item_table_row_start($items{$item}{text},$count); |
|
} |
if ($items{$item}{input} eq 'radio') { |
if ($items{$item}{input} eq 'radio') { |
$datatable .= &yesno_radio($item,$settings); |
$datatable .= &yesno_radio($item,$settings); |
} elsif ($item eq 'cloners') { |
} elsif ($item eq 'cloners') { |
Line 1746 sub print_feedback {
|
Line 1751 sub print_feedback {
|
my %sections = &Apache::loncommon::get_sections($cdom,$cnum); |
my %sections = &Apache::loncommon::get_sections($cdom,$cnum); |
my @sections = sort( { $a <=> $b } keys(%sections)); |
my @sections = sort( { $a <=> $b } keys(%sections)); |
my %lt = &Apache::lonlocal::texthash ( |
my %lt = &Apache::lonlocal::texthash ( |
currone => 'Current recipient:', |
currone => 'Current recipient:', |
curmult => 'Current recipients:', |
currmult => 'Current recipients:', |
add => 'Additional recipient:', |
add => 'Additional recipient:', |
del => 'Delete?', |
del => 'Delete?', |
sec => 'Sections:', |
sec => 'Sections:', |
); |
); |
|
|
foreach my $item (@{$ordered}) { |
foreach my $item (@{$ordered}) { |
$count ++; |
$count ++; |
$datatable .= &item_table_row_start($items{$item}{text},$count); |
if ($position eq 'top') { |
|
$datatable .= &item_table_row_start($items{$item}{text},$count); |
|
} else { |
|
$datatable .= &item_table_row_start($items{$item}{text}."<br/>(Custom text)",$count, "advanced"); |
|
} |
if ($position eq 'top') { |
if ($position eq 'top') { |
my $includeempty = 0; |
my $includeempty = 0; |
$datatable .= &user_table($cdom,$item,\@sections, |
$datatable .= &user_table($cdom,$item,\@sections, |
Line 1811 sub user_table {
|
Line 1820 sub user_table {
|
if ($num) { |
if ($num) { |
$output .= '<tr>'. |
$output .= '<tr>'. |
'<td align="left"><i>'; |
'<td align="left"><i>'; |
if ($num > 1) { |
if ($num == 1) { |
$output .= $lt->{'currone'}; |
$output .= $lt->{'currone'}; |
} else { |
} else { |
$output .= $lt->{'currmult'}; |
$output .= $lt->{'currmult'}; |
Line 1931 sub print_discussion {
|
Line 1940 sub print_discussion {
|
my %sections = &Apache::loncommon::get_sections($cdom,$cnum); |
my %sections = &Apache::loncommon::get_sections($cdom,$cnum); |
my @sections = sort( { $a <=> $b } keys(%sections)); |
my @sections = sort( { $a <=> $b } keys(%sections)); |
my %lt = &Apache::lonlocal::texthash ( |
my %lt = &Apache::lonlocal::texthash ( |
currone => 'Disallowed:', |
currone => 'Disallowed:', |
curmult => 'Disallowed:', |
currmult => 'Disallowed:', |
add => 'Disallow more:', |
add => 'Disallow more:', |
del => 'Delete?', |
del => 'Delete?', |
sec => 'Sections:', |
sec => 'Sections:', |
); |
); |
|
|
foreach my $item (@{$ordered}) { |
foreach my $item (@{$ordered}) { |
Line 2431 sub get_other_items {
|
Line 2440 sub get_other_items {
|
} |
} |
|
|
sub item_table_row_start { |
sub item_table_row_start { |
my ($text,$count) = @_; |
my ($text,$count,$add_class) = @_; |
my $output; |
my $output; |
if ($count%2) { |
my $css_class = ($count % 2) ? 'LC_odd_row' : 'LC_even_row'; |
$output .= '<tr class="LC_odd_row">'; |
$css_class = (join(' ',$css_class,$add_class)) unless ($add_class eq ''); |
} else { |
$output .= '<tr class="'.$css_class.'">'."\n";; |
$output .= '<tr>'; |
|
} |
|
$output .= '<td class="LC_left_item">'.$text. |
$output .= '<td class="LC_left_item">'.$text. |
'</td><td class="LC_right_item" align="right">'; |
'</td><td class="LC_right_item">'; |
return $output; |
return $output; |
} |
} |
|
|