[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 {