Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Item14205: Not compatible with perl 5.8.8
  • Loading branch information
gac410 committed Nov 14, 2016
1 parent 1dec01a commit b8a202c
Showing 1 changed file with 4 additions and 2 deletions.
6 changes: 4 additions & 2 deletions core/lib/Foswiki/Aux/MuteOut.pm
Expand Up @@ -57,8 +57,10 @@ sub new {

my ( $oldOut, $oldErr, $rc );

my $outFile = $params{outFile} // File::Spec->devnull;
my $errFile = $params{errFile} // File::Spec->devnull;
my $outFile =
( defined $params{outFile} ) ? $params{outFile} : File::Spec->devnull;
my $errFile =
( defined $params{errFile} ) ? $params{errFile} : File::Spec->devnull;

unless ( open $oldOut, ">&", STDOUT ) {
Foswiki::Aux::Dependencies::_msg( "Cannot dup STDOUT: " . $! );
Expand Down

0 comments on commit b8a202c

Please sign in to comment.