Check permission to delete home dirs in batch operations

This commit is contained in:
Jamie Cameron
2026-06-14 13:29:54 -07:00
parent 804591f892
commit 1445cd7641
2 changed files with 4 additions and 2 deletions

View File

@@ -392,7 +392,8 @@ foreach $line (split(/[\r\n]+/, $data)) {
# Delete his home directory
if ($in{'delhome'} &&
$user->{'home'} &&
$user->{'home'} !~ /^\/+$/) {
$user->{'home'} !~ /^\/+$/ &&
$access{'delhome'}) {
&delete_home_directory($user);
}

View File

@@ -222,7 +222,8 @@ else {
}
&unlock_user_files();
if ($in{'delhome'} && $user->{'home'} !~ /^\/+$/) {
if ($in{'delhome'} && $user->{'home'} !~ /^\/+$/ &&
$access{'delhome'}) {
print "$text{'udel_home'}<br>\n";
&lock_file($user->{'home'});
&delete_home_directory($user);