Item14205: Not compatible with perl 5.8.8

foswiki · Nov 14, 2016 · b8a202c · b8a202c
1 parent 1dec01a
commit b8a202c
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/core/lib/Foswiki/Aux/MuteOut.pm b/core/lib/Foswiki/Aux/MuteOut.pm
@@ -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: " . $! );