version 1.63, 2008/07/13 00:00:50
|
version 1.66, 2008/07/21 16:24:31
|
Line 80 sub handler {
|
Line 80 sub handler {
|
my %prefs = ( |
my %prefs = ( |
'rolecolors' => |
'rolecolors' => |
{ text => 'Default color schemes', |
{ text => 'Default color schemes', |
help => 'Default_Color_Schemes', |
help => 'Domconfig_Color_Schemes', |
header => [{col1 => 'Student Settings', |
header => [{col1 => 'Student Settings', |
col2 => '',}, |
col2 => '',}, |
{col1 => 'Coordinator Settings', |
{col1 => 'Coordinator Settings', |
Line 92 sub handler {
|
Line 92 sub handler {
|
}, |
}, |
'login' => |
'login' => |
{ text => 'Log-in page options', |
{ text => 'Log-in page options', |
help => 'Domain_Log-in_Page', |
help => 'Domconfig_Login_Page', |
header => [{col1 => 'Item', |
header => [{col1 => 'Item', |
col2 => '',}], |
col2 => '',}], |
}, |
}, |
'defaults' => |
'defaults' => |
{ text => 'Default authentication/language/timezone', |
{ text => 'Default authentication/language/timezone', |
help => '', |
help => 'Domconfig_LangTZAuth', |
header => [{col1 => 'Setting', |
header => [{col1 => 'Setting', |
col2 => 'Value'}], |
col2 => 'Value'}], |
}, |
}, |
'quotas' => |
'quotas' => |
{ text => 'Default quotas for user portfolios', |
{ text => 'Default quotas for user portfolios', |
help => 'Default_User_Quota', |
help => 'Domconfig_Quotas', |
header => [{col1 => 'User type', |
header => [{col1 => 'User type', |
col2 => 'Default quota'}], |
col2 => 'Default quota'}], |
}, |
}, |
'autoenroll' => |
'autoenroll' => |
{ text => 'Auto-enrollment settings', |
{ text => 'Auto-enrollment settings', |
help => 'Domain_Auto_Enrollment', |
help => 'Domconfig_Auto_Enrollment', |
header => [{col1 => 'Configuration setting', |
header => [{col1 => 'Configuration setting', |
col2 => 'Value(s)'}], |
col2 => 'Value(s)'}], |
}, |
}, |
'autoupdate' => |
'autoupdate' => |
{ text => 'Auto-update settings', |
{ text => 'Auto-update settings', |
help => 'Domain_Auto_Update', |
help => 'Domconfig_Auto_Updates', |
header => [{col1 => 'Setting', |
header => [{col1 => 'Setting', |
col2 => 'Value',}, |
col2 => 'Value',}, |
{col1 => 'User population', |
{col1 => 'User population', |
Line 124 sub handler {
|
Line 124 sub handler {
|
}, |
}, |
'directorysrch' => |
'directorysrch' => |
{ text => 'Institutional directory searches', |
{ text => 'Institutional directory searches', |
help => 'Domain_Directory_Search', |
help => 'Domconfig_InstDirectory_Search', |
header => [{col1 => 'Setting', |
header => [{col1 => 'Setting', |
col2 => 'Value',}], |
col2 => 'Value',}], |
}, |
}, |
'contacts' => |
'contacts' => |
{ text => 'Contact Information', |
{ text => 'Contact Information', |
help => 'Domain_Contact_Information', |
help => 'Domconfig_Contact_Info', |
header => [{col1 => 'Setting', |
header => [{col1 => 'Setting', |
col2 => 'Value',}], |
col2 => 'Value',}], |
}, |
}, |
|
|
'usercreation' => |
'usercreation' => |
{ text => 'User creation', |
{ text => 'User creation', |
help => 'Domain_User_Creation', |
help => 'Domconfig_User_Creation', |
header => [{col1 => 'Format rule type', |
header => [{col1 => 'Format rule type', |
col2 => 'Format rules in force'}, |
col2 => 'Format rules in force'}, |
{col1 => 'User account creation', |
{col1 => 'User account creation', |
Line 147 sub handler {
|
Line 147 sub handler {
|
}, |
}, |
'usermodification' => |
'usermodification' => |
{ text => 'User modification', |
{ text => 'User modification', |
help => 'Domain_User_Modification', |
help => 'Domconfig_User_Modification', |
header => [{col1 => 'Target user has role', |
header => [{col1 => 'Target user has role', |
col2 => 'User information updateable in author context'}, |
col2 => 'User information updateable in author context'}, |
{col1 => 'Target user has role', |
{col1 => 'Target user has role', |
Line 157 sub handler {
|
Line 157 sub handler {
|
}, |
}, |
'scantron' => |
'scantron' => |
{ text => 'Scantron format file', |
{ text => 'Scantron format file', |
help => 'Domain_Scantron_Formats', |
help => 'Domconfig_Scantron_Format', |
header => [ {col1 => 'Item', |
header => [ {col1 => 'Item', |
col2 => '', |
col2 => '', |
}], |
}], |
}, |
}, |
'coursecategories' => |
'coursecategories' => |
{ text => 'Cataloging of courses', |
{ text => 'Cataloging of courses', |
help => 'Domain_Course_Catalog', |
help => 'Domconfig_Cataloging_Courses', |
header => [{col1 => 'Category settings', |
header => [{col1 => 'Category settings', |
col2 => '',}, |
col2 => '',}, |
{col1 => 'Categories', |
{col1 => 'Categories', |
Line 319 sub handler {
|
Line 319 sub handler {
|
} |
} |
$count = 0; |
$count = 0; |
foreach my $item (@prefs_order) { |
foreach my $item (@prefs_order) { |
$r->print('<h4><label><input type="checkbox" name="actions" value="'.$item.'" /> '.&mt($prefs{$item}->{'text'}).'</label></h4>'); |
$r->print('<h4>'. |
|
&Apache::loncommon::help_open_topic($prefs{$item}->{'help'}). |
|
'<label><input type="checkbox" name="actions" value="'.$item. |
|
'" /> '.&mt($prefs{$item}->{'text'}).'</label></h4>'); |
$count ++; |
$count ++; |
if ((!$seconddiv) && ($count >= $midpoint)) { |
if ((!$seconddiv) && ($count >= $midpoint)) { |
$r->print('</div>'."\n".'<div class="LC_left_float">'."\n"); |
$r->print('</div>'."\n".'<div class="LC_left_float">'."\n"); |
Line 382 sub print_config_box {
|
Line 385 sub print_config_box {
|
$output .= |
$output .= |
'<table class="LC_nested_outer"> |
'<table class="LC_nested_outer"> |
<tr> |
<tr> |
<th align="left"><span class="LC_nobreak">'.&mt($item->{text}). |
<th align="left" valign="middle"><span class="LC_nobreak">'. |
' </span></th></tr>'; |
&mt($item->{text}).' '. |
# |
&Apache::loncommon::help_open_topic($item->{'help'}).'</span></th>'."\n". |
# FIXME - put the help link back in when the help files exist |
'</tr>'; |
# <th>'.&mt($item->{text}).' '. |
|
# &Apache::loncommon::help_open_topic($item->{'help'}).'</th> |
|
# </tr>'); |
|
$rowtotal ++; |
$rowtotal ++; |
if (($action eq 'autoupdate') || ($action eq 'rolecolors') || |
if (($action eq 'autoupdate') || ($action eq 'rolecolors') || |
($action eq 'usercreation') || ($action eq 'usermodification') || |
($action eq 'usercreation') || ($action eq 'usermodification') || |
($action eq 'coursecategories')) { |
($action eq 'coursecategories')) { |
my $colspan = ($action eq 'rolecolors')?' colspan="2"':''; |
my $colspan = ''; |
|
if (($action eq 'rolecolors') || ($action eq 'coursecategories')) { |
|
$colspan = ' colspan="2"'; |
|
} |
$output .= ' |
$output .= ' |
<tr> |
<tr> |
<td> |
<td> |
Line 423 sub print_config_box {
|
Line 426 sub print_config_box {
|
<table class="LC_nested"> |
<table class="LC_nested"> |
<tr class="LC_info_row"> |
<tr class="LC_info_row"> |
<td class="LC_left_item"'.$colspan.'>'.&mt($item->{'header'}->[1]->{'col1'}).'</td>'; |
<td class="LC_left_item"'.$colspan.'>'.&mt($item->{'header'}->[1]->{'col1'}).'</td>'; |
my $colspan = ($action eq 'coursecategories')?' colspan="2"':''; |
|
$output .= ' |
$output .= ' |
<td class="LC_right_item"'.$colspan.'>'.&mt($item->{'header'}->[1]->{'col2'}).'</td> |
<td class="LC_right_item"'.$colspan.'>'.&mt($item->{'header'}->[1]->{'col2'}).'</td> |
</tr>'; |
</tr>'; |
Line 1983 sub print_scantronformat {
|
Line 1985 sub print_scantronformat {
|
$css_class = $itemcount%2?' class="LC_odd_row"':''; |
$css_class = $itemcount%2?' class="LC_odd_row"':''; |
$datatable .= '<tr'.$css_class.'>'; |
$datatable .= '<tr'.$css_class.'>'; |
if (!$is_custom) { |
if (!$is_custom) { |
$datatable .= '<td>'.&mt('Default in use:').'<br />'; |
$datatable .= '<td>'.&mt('Default in use:').'<br />'. |
|
'<span class="LC_nobreak">'; |
if ($scantronurl) { |
if ($scantronurl) { |
$datatable .= '<a href="'.$scantronurl.'" target="_blank">'. |
$datatable .= '<a href="'.$scantronurl.'" target="_blank">'. |
&mt('Default scantron format file').'</a>'; |
&mt('Default scantron format file').'</a>'; |
} else { |
} else { |
$datatable = &mt('File unavailable for display'); |
$datatable = &mt('File unavailable for display'); |
} |
} |
$datatable .= '</td>'; |
$datatable .= '</span></td>'; |
if (keys(%error) == 0) { |
if (keys(%error) == 0) { |
$datatable .= '<td valign="bottom">'; |
$datatable .= '<td valign="bottom">'; |
if (!$switchserver) { |
if (!$switchserver) { |
Line 2011 sub print_scantronformat {
|
Line 2014 sub print_scantronformat {
|
} |
} |
$datatable .= '<td>'.$errorstr.'</td><td> '; |
$datatable .= '<td>'.$errorstr.'</td><td> '; |
} elsif ($scantronurl) { |
} elsif ($scantronurl) { |
$datatable .= '<td><a href="'.$scantronurl.'" target="_blank">' |
$datatable .= '<td><span class="LC_nobreak">'. |
.&mt('Custom scantron format file').'</a>' |
'<a href="'.$scantronurl.'" target="_blank">'. |
.'<span class="LC_nobreak"><label>' |
&mt('Custom scantron format file').'</a><label>'. |
.'<input type="checkbox" name="scantronformat_del"' |
'<input type="checkbox" name="scantronformat_del"'. |
.'" value="1" />'.&mt('Delete?').'</label></td>' |
'" value="1" />'.&mt('Delete?').'</label></span></td>'. |
.'<td>'.&mt('Replace:').'</span><br />'; |
'<td><span class="LC_nobreak"> '. |
|
&mt('Replace:').'</span><br />'; |
} |
} |
} |
} |
if (keys(%error) == 0) { |
if (keys(%error) == 0) { |
if ($switchserver) { |
if ($switchserver) { |
$datatable .= &mt('Upload to library server: [_1]',$switchserver); |
$datatable .= &mt('Upload to library server: [_1]',$switchserver); |
} else { |
} else { |
$datatable .=' <input type="file" name="scantronformat" />'; |
$datatable .='<span class="LC_nobreak"> '. |
|
'<input type="file" name="scantronformat" /></span>'; |
} |
} |
} |
} |
$datatable .= '</td></tr>'; |
$datatable .= '</td></tr>'; |