projects
/
feisty_meow.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0065bf3
)
took out noisesome logging
author
Chris Koeritz
<fred@gruntose.com>
Wed, 13 Jul 2022 20:49:15 +0000
(16:49 -0400)
committer
Chris Koeritz
<fred@gruntose.com>
Wed, 13 Jul 2022 20:49:15 +0000
(16:49 -0400)
scripts/files/safedel.pl
patch
|
blob
|
history
diff --git
a/scripts/files/safedel.pl
b/scripts/files/safedel.pl
index 010cd959d83976bb61263867142a85e291135605..6b8ed29a3419cddab46db8dec93e8b58102cfceb 100644
(file)
--- a/
scripts/files/safedel.pl
+++ b/
scripts/files/safedel.pl
@@
-63,7
+63,8
@@
exit 0;
sub safedel {
# get the list of files and directories to whack.
local(@to_delete) = &glob_list(@_);
sub safedel {
# get the list of files and directories to whack.
local(@to_delete) = &glob_list(@_);
-print "list of whackees: @to_delete\n";
+#hmmm: make this into a debug option.
+#print "list of whackees: @to_delete\n";
# we store the deleted files in a directory under the temporary directory.
if (! -d $TMP) {
# we store the deleted files in a directory under the temporary directory.
if (! -d $TMP) {
@@
-147,7
+148,11
@@
print "list of whackees: @to_delete\n";
print REPORT $printable_date . " -- from [@deleted]\n";
close(REPORT);
} else {
print REPORT $printable_date . " -- from [@deleted]\n";
close(REPORT);
} else {
- print "No files were deleted.\n";
+#hmmm: oh good, and we should always bug people about nothing having been done?
+# this is especially tiresome when our own scripts cause safedel to be invoked,
+# since then they are automatically noisy and blathery.
+#hmmm: make this into a debug option.
+# print "No files were deleted.\n";
}
}
}
}