From ade931a09f4fdbae5fb82bcf5ed50d6ff00591cb Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@gmail.com>
Date: Sat, 24 Jan 2009 15:20:52 +0100
Subject: [PATCH] appending stdout / stderr to output

---
 lib/App/CPAN2Pkg/Module.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/App/CPAN2Pkg/Module.pm b/lib/App/CPAN2Pkg/Module.pm
index f9910fe..b0acab3 100644
--- a/lib/App/CPAN2Pkg/Module.pm
+++ b/lib/App/CPAN2Pkg/Module.pm
@@ -185,14 +185,14 @@ sub _find_prereqs {
 
 sub _stderr {
     my ($k, $self, $line) = @_[KERNEL, HEAP, ARG0];
-    $k->post('ui', 'append', $self, "$line\n");
+    $k->post('ui', 'append', $self, "stderr: $line\n");
 }
 
 sub _stdout {
     my ($k, $self, $line) = @_[KERNEL, HEAP, ARG0];
     $line .= "\n";
     $self->_output( $self->_output . $line );
-    $k->post('ui', 'append', $self, $line);
+    $k->post('ui', 'append', $self, "stdout: $line");
 }
 
 
-- 
2.11.4.GIT