put equal sign for module parameters in trace() method
Sawyer X [Thu, 23 Feb 2012 12:35:59 +0000 (14:35 +0200)]
lib/App/FatPacker.pm

index e7cdd91..a6a01e3 100644 (file)
@@ -83,9 +83,9 @@ sub script_command_trace {
   }
   my $arg = do {
     if ($to_stderr) {
-      "=>&STDERR"
+      "=&STDERR"
     } elsif ($file) {
-      "=>>${file}"
+      ">>${file}"
     }
   };
 
@@ -107,7 +107,7 @@ sub trace {
   }
 
   {
-    local $ENV{PERL5OPT} = '-MApp::FatPacker::Trace'.$output;
+    local $ENV{PERL5OPT} = '-MApp::FatPacker::Trace='.$output;
     system $^X, @$args;
   }
 }