version 1.48, 2011/12/14 23:55:50
|
version 1.49, 2012/02/15 21:36:30
|
Line 665 sub process_changes {
|
Line 665 sub process_changes {
|
} |
} |
} |
} |
} elsif (ref($item->{'ordered'}) eq 'ARRAY') { |
} elsif (ref($item->{'ordered'}) eq 'ARRAY') { |
@ordered = @{$item->{'ordered'}}; |
if ($action eq 'courseinfo') { |
|
my ($can_toggle_cat,$can_categorize) = |
|
&can_modify_catsettings($cdom,$crstype); |
|
foreach my $entry (@{$item->{'ordered'}}) { |
|
next if (($entry eq 'hidefromcat') && |
|
(!$can_toggle_cat)); |
|
next if (($entry eq 'categories') && |
|
(!$can_categorize)); |
|
next if (($entry eq 'loncaparev') || |
|
($entry eq 'owner')); |
|
push(@ordered,$entry); |
|
} |
|
} else { |
|
@ordered = @{$item->{'ordered'}}; |
|
} |
} |
} |
if (@ordered > 0) { |
if (@ordered > 0) { |
if ($action eq 'feedback') { |
if ($action eq 'feedback') { |
Line 707 sub process_changes {
|
Line 721 sub process_changes {
|
} |
} |
} else { |
} else { |
foreach my $entry (@ordered) { |
foreach my $entry (@ordered) { |
next if (($entry eq 'loncaparev') || ($entry eq 'owner')); |
|
if ($entry eq 'cloners') { |
if ($entry eq 'cloners') { |
if ($env{'form.cloners_all'}) { |
if ($env{'form.cloners_all'}) { |
$newvalues{$entry} = '*'; |
$newvalues{$entry} = '*'; |