version 1.21, 2010/01/18 20:14:25
|
version 1.22, 2010/01/27 13:08:01
|
Line 862 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 903 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 978 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)').': '. |