version 1.21.4.5, 2014/02/15 17:14:53
|
version 1.21.4.6, 2014/04/23 10:26:37
|
Line 258 sub display_settings {
|
Line 258 sub display_settings {
|
if (grep(/^\Q$item\E$/,@actions)) { |
if (grep(/^\Q$item\E$/,@actions)) { |
push(@items,$item); |
push(@items,$item); |
if ($context eq 'domain') { |
if ($context eq 'domain') { |
my $settings = $values->{$item}; |
my $settings; |
|
if (ref($values) eq 'HASH') { |
|
$settings = $values->{$item}; |
|
} |
if ($item eq 'usersessions') { |
if ($item eq 'usersessions') { |
$r->print('<script type="text/javascript">'."\n". |
$r->print('<script type="text/javascript">'."\n". |
'// <![CDATA['."\n". |
'// <![CDATA['."\n". |
Line 266 sub display_settings {
|
Line 269 sub display_settings {
|
'// ]]>'."\n". |
'// ]]>'."\n". |
'</script>'."\n"); |
'</script>'."\n"); |
} elsif ($item eq 'selfcreation') { |
} elsif ($item eq 'selfcreation') { |
$settings = $values->{'usercreation'}; |
if (ref($values) eq 'HASH') { |
|
$settings = $values->{'usercreation'}; |
|
} |
|
} elsif ($item eq 'defaults') { |
|
if (ref($values->{'inststatus'}) eq 'HASH') { |
|
if (ref($values->{'defaults'}) eq 'HASH') { |
|
$settings = {%{$values->{'inststatus'}},%{$values->{'defaults'}}}; |
|
} else { |
|
$settings = $values->{'inststatus'}; |
|
} |
|
} else { |
|
my ($othertitle,$usertypes,$types) = &Apache::loncommon::sorted_inst_types($dom); |
|
my $inststatus = { |
|
inststatustypes => $usertypes, |
|
inststatusorder => $types, |
|
inststatusguest => [], |
|
}; |
|
if (ref($values->{defaults}) eq 'HASH') { |
|
$settings = {%{$inststatus},%{$values->{'defaults'}}}; |
|
} else { |
|
$settings = $inststatus; |
|
} |
|
} |
} |
} |
($output{$item},$rowtotal{$item}) = |
($output{$item},$rowtotal{$item}) = |
&Apache::domainprefs::print_config_box($r,$dom,$confname, |
&Apache::domainprefs::print_config_box($r,$dom,$confname, |