projects
/
feisty_meow.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added normal storage area of old code.
[feisty_meow.git]
/
scripts
/
files
/
safedel.pl
diff --git
a/scripts/files/safedel.pl
b/scripts/files/safedel.pl
index 2315464e1d150781f008b1727f3eb3834c186686..0fd25678045e95c10b5acef0852aec2bf64c578f 100644
(file)
--- 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!";
}
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;
if ( ($file =~ /^.*\/\.$/) || ($file =~ /^.*\/\.\.$/) ) {
print "ignoring attempt to remove current or parent directory.\n";
next;