X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ffiles%2Fzap_the_dir.pl;h=049838509250fbbe4dd1bc94cf53162a5220209b;hb=df6eb09e6c7ce53df0caf754fe2a8d8272ca319e;hp=6d0b6212144237fd519559499836a82984aae3a3;hpb=e471e89ab16d0224ad0abf3f1c1bef39481aa254;p=feisty_meow.git diff --git a/scripts/files/zap_the_dir.pl b/scripts/files/zap_the_dir.pl index 6d0b6212..04983850 100644 --- a/scripts/files/zap_the_dir.pl +++ b/scripts/files/zap_the_dir.pl @@ -42,9 +42,11 @@ sub remove_whackables { $fname = $from_dir . '/' . $fname; #print "whacking: $fname.\n"; unlink $fname; - if (-d "$fname") { - print "recursively deleting directory: $fname\n"; + if (-f "$fname") { + print "cleaning file: $fname\n"; &recursive_delete($fname); + } else { + print "not touching unimportant dir right now: $fname\n"; } } }