version 1.165, 2006/10/19 20:36:12
|
version 1.166, 2006/10/19 21:23:22
|
Line 550 sub delete_confirmed {
|
Line 550 sub delete_confirmed {
|
$env{'form.currentpath'}. |
$env{'form.currentpath'}. |
$delete_file); |
$delete_file); |
if ($result ne 'ok') { |
if ($result ne 'ok') { |
$r->print('<span class="LC_error"> An error occured ('.$result. |
$r->print('<span class="LC_error">'. |
') while trying to delete '. |
&mt('An error occured ([_1]) while trying to delete |
&display_file(undef, $delete_file).'</span><br />'); |
[_2].',$result,&display_file(undef, $delete_file)). |
|
'</span><br /><br />'); |
} else { |
} else { |
$r->print(&mt('File: [_1] deleted.', |
$r->print(&mt('File: [_1] deleted.', |
&display_file(undef,$delete_file))); |
&display_file(undef,$delete_file))); |
Line 563 sub delete_confirmed {
|
Line 564 sub delete_confirmed {
|
$group,$file_name); |
$group,$file_name); |
if (keys(%access_controls) > 0) { |
if (keys(%access_controls) > 0) { |
my %changes; |
my %changes; |
foreach my $key (%{$access_controls{$file_name}}) { |
foreach my $key (keys(%{$access_controls{$file_name}})) { |
$changes{'delete'}{$key} = 1; |
$changes{'delete'}{$key} = 1; |
} |
} |
if (keys(%changes) > 0) { |
if (keys(%changes) > 0) { |
Line 573 sub delete_confirmed {
|
Line 574 sub delete_confirmed {
|
if ($outcome ne 'ok') { |
if ($outcome ne 'ok') { |
$r->print('<br />'.&mt("An error occured ([_1]) while ". |
$r->print('<br />'.&mt("An error occured ([_1]) while ". |
"trying to delete access controls for the file.",$outcome). |
"trying to delete access controls for the file.",$outcome). |
'</span><br />'); |
'</span><br /><br />'); |
} else { |
} else { |
if ($deloutcome eq 'ok') { |
if ($deloutcome eq 'ok') { |
$r->print('<br />'.&mt('Access controls also deleted for the file.')); |
$r->print('<br />'.&mt('Access controls also deleted for the file.').'<br /><br />'); |
} else { |
} else { |
$r->print('<span class="LC_error">'.'<br />'. |
$r->print('<span class="LC_error">'.'<br />'. |
&mt("An error occured ([_1]) while ". |
&mt("An error occured ([_1]) while ". |
"trying to delete access controls for the file.",$deloutcome). |
"trying to delete access controls for the file.",$deloutcome). |
'</span><br />'); |
'</span><br /><br />'); |
} |
} |
} |
} |
} |
} |