[PATCH] Syncing with Test::Simple 0.19

[p5sagit/p5-mst-13.2.git] / lib / Test / More.pm

diff --git a/lib/Test/More.pm b/lib/Test/More.pm
index 925e48e..92d1d88 100644 (file)
--- a/lib/Test/More.pm
+++ b/lib/Test/More.pm
@@ -14,7 +14,7 @@ BEGIN {
 
 require Exporter;
 use vars qw($VERSION @ISA @EXPORT $TODO);
-$VERSION = '0.18';
+$VERSION = '0.19';
 @ISA    = qw(Exporter);
 @EXPORT = qw(ok use_ok require_ok
              is isnt like
@@ -567,6 +567,7 @@ USE
     my $ok = ok( !$@, "use $module;" );
 
     unless( $ok ) {
+        chomp $@;
         my_print *TESTERR, <<DIAGNOSTIC;
 #     Tried to use '$module'.
 #     Error:  $@
@@ -598,6 +599,7 @@ REQUIRE
     my $ok = ok( !$@, "require $module;" );
 
     unless( $ok ) {
+        chomp $@;
         my_print *TESTERR, <<DIAGNOSTIC;
 #     Tried to require '$module'.
 #     Error:  $@