Mercurial > pub > Impl

diff Lib/IMPL/Test/TAPListener.pm @ 84:e568c7c8b743

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor changes to the test infrastructure
author wizard
date Wed, 14 Apr 2010 17:38:11 +0400
parents 16ada169ca75
children 52eeec77504b
line wrap: on
line diff
--- a/Lib/IMPL/Test/TAPListener.pm	Tue Apr 13 20:27:56 2010 +0400
+++ b/Lib/IMPL/Test/TAPListener.pm	Wed Apr 14 17:38:11 2010 +0400
@@ -58,7 +58,7 @@
             $result->State == IMPL::Test::Result::SUCCESS ?
             "ok $n " . join("\n# ", split(/\n/, $result->Name) )
                 :
-            "not ok $n " . (eval { $result->Exception->isa('IMPL::Test::SkipException') } ? '# SKIP ' : '') . join("\n# ", split(/\n/, $result->Name."\n".$result->Exception || '') )
+            "not ok $n " . (eval { $result->Exception->isa('IMPL::Test::SkipException') } ? '#SKIP: ' : '') . join("\n# ", split(/\n/, $result->Name.": ".$result->Exception || '') )
         ),"\n";
         
 }