Fixed bug in open call

[clearscm.git] / lib / Logger.pm

diff --git a/lib/Logger.pm b/lib/Logger.pm
index 4d31d3e..f57b6ef 100644 (file)
--- a/lib/Logger.pm
+++ b/lib/Logger.pm
@@ -685,7 +685,7 @@ Returns:
 
   display "\$ $cmd", $self->{handle} if get_debug;
 
-  my $status = open my $output, '|', "$cmd 2>&1";
+  my $status = open my $output, '-|', "$cmd 2>&1";
 
   if (!$status) {
     $self->{error}++;