X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ffiles%2Fsafedel.pl;h=ae6f81387451a48e52010e45688187a26288b0cf;hb=f2aa040bbb4b45acf77d75675934176e52d26df5;hp=30503fa50c4b0f87abbcd5e3b7f8d011e0e85040;hpb=e471e89ab16d0224ad0abf3f1c1bef39481aa254;p=feisty_meow.git

diff --git a/scripts/files/safedel.pl b/scripts/files/safedel.pl
index 30503fa5..ae6f8138 100644
--- a/scripts/files/safedel.pl
+++ b/scripts/files/safedel.pl
@@ -72,9 +72,15 @@ sub safedel {
 #  print "final list of whackees: @to_delete\n";
 
   # we store the deleted files in a directory under the temporary directory.
-  $temp_subdir = $TMP . "/zz_del_keep";
+  if (! -d $TMP) { 
+    mkdir "$TMP", 0700;
+    if (! -d $TMP) {
+      die "the TMP directory $TMP could not be created!\n";
+    }
+  }
+  $temp_subdir = $TMP . "/zz_safedel_keep";
   if (! -d $temp_subdir) {
-    mkdir "$temp_subdir", 0777;
+    mkdir "$temp_subdir", 0700;
       # create the subdirectory under temp if missing.
     if (! -d $temp_subdir) {
       die "the directory $temp_subdir could not be created!\n";