X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ffiles%2Fsafedel.pl;h=0fd25678045e95c10b5acef0852aec2bf64c578f;hb=366ada5b8fb59769ababfd39a68e3b51d46cf2d8;hp=c0d710829c096c783f534366c74c62fbbbb2af40;hpb=c29eee258afdbf817f829c5765275a1758d9752f;p=feisty_meow.git diff --git a/scripts/files/safedel.pl b/scripts/files/safedel.pl index c0d71082..0fd25678 100644 --- a/scripts/files/safedel.pl +++ b/scripts/files/safedel.pl @@ -91,6 +91,9 @@ sub safedel { if (substr($file, length($file) - 1, 1) eq ":") { die "removing the root directory of a drive is not permitted!"; } + +#print "file to whack: '$file'\n"; + if ( ($file =~ /^.*\/\.$/) || ($file =~ /^.*\/\.\.$/) ) { print "ignoring attempt to remove current or parent directory.\n"; next; @@ -116,7 +119,7 @@ sub safedel { } push(@deleted, "\"$file\""); } elsif (-f $file) { -print "about to chmod file\n"; +#print "about to chmod file\n"; # make the file writable by our user if possible (which resets any # prior permissions as long as we're the owner). system("chmod u+rw '$file'");