From: Chris Koeritz 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 = "';'";