X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;ds=inline;f=scripts%2Ffiles%2Fzap_the_dir.pl;h=049838509250fbbe4dd1bc94cf53162a5220209b;hb=2124f07354cd4e237acb129c536ec8af53b8cbd8;hp=6d0b6212144237fd519559499836a82984aae3a3;hpb=75c2d52632eac5470a48d9b44feb336474a187d8;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"; } } }