From: Chris Koeritz <fred@gruntose.com>
Date: Thu, 23 Feb 2012 15:58:28 +0000 (-0500)
Subject: perl seems to interfere with &> /dev/null, and rather than research why right now,
X-Git-Tag: 2.140.90~1565
X-Git-Url: https://feistymeow.org/gitweb/?a=commitdiff_plain;h=8c74610aa57655d5a2041e1d5a494c2fa57f4eca;p=feisty_meow.git

perl seems to interfere with &> /dev/null, and rather than research why right now,
i switched to '> /dev/null 2> /dev/null'.
---

diff --git a/scripts/files/safedel.pl b/scripts/files/safedel.pl
index 44288b41..97fa01d9 100644
--- a/scripts/files/safedel.pl
+++ b/scripts/files/safedel.pl
@@ -32,7 +32,7 @@ if ($#ARGV < 0) {
   die "Too few arguments to command.";
 }
 
-$DEV_NULL = "&> /dev/null";
+$DEV_NULL = "> /dev/null 2> /dev/null";
 if ($OS eq "UNIX") {
   $FIND_ENDING = "';'";
   $zip = "zip -y ";
diff --git a/scripts/files/zapdirs.pl b/scripts/files/zapdirs.pl
index f2b397a7..9ca8cb39 100644
--- a/scripts/files/zapdirs.pl
+++ b/scripts/files/zapdirs.pl
@@ -21,7 +21,7 @@
 
 require "zap_the_dir.pl";
 
-$DEV_NULL = "&>/dev/null";
+$DEV_NULL = "> /dev/null 2> /dev/null";
 #hmmm: move this to a useful location in a perl library.
 if ($OS eq "UNIX") {
   $FIND_ENDING = "';'";