[svn:Module-Build] r13315 - Module-Build/trunk/t/lib

[email protected] Sat, 12 Sep 2009 13:24:46 -0700 (PDT)
Newsgroups perl.module.build.checkins
Message-ID <[email protected]>
Author: dagolden
Date: Sat Sep 12 13:24:43 2009
New Revision: 13315

Modified:
   Module-Build/trunk/t/lib/MBTest.pm

Log:
use wantarray in test helper stdout_stderr_of()

Modified: Module-Build/trunk/t/lib/MBTest.pm
==============================================================================
--- Module-Build/trunk/t/lib/MBTest.pm	(original)
+++ Module-Build/trunk/t/lib/MBTest.pm	Sat Sep 12 13:24:43 2009
@@ -155,7 +155,7 @@
   $stdout = stdout_of ( sub {
       $stderr = stderr_of( $subr )
   });
-  return ($stdout, $stderr);
+  return wantarray ? ($stdout, $stderr) : $stdout . $stderr;
 }
 
 sub slurp {