Browse files

Display the POE::Test::Loops version, the better to tell when a CPAN

tester is running mis-matched tests against POE.
  • Loading branch information...
1 parent b8458a6 commit 786d9cf24de207fdca7656c965531bc16cc2743b @rcaputo committed Oct 7, 2009
Showing with 9 additions and 4 deletions.
  1. +9 −4 t/00_info.t
View
13 t/00_info.t
@@ -3,9 +3,14 @@
use warnings;
use strict;
-use Test::More tests => 1;
-use_ok( 'POE' );
+use Test::More tests => 2;
+use_ok('POE');
+use_ok('POE::Test::Loops');
# idea from Test::Harness, thanks!
-diag("Testing POE $POE::VERSION, Perl $], $^X on $^O");
-
+diag(
+ "Testing POE $POE::VERSION, ",
+ "POE::Test::Loops $POE::Test::Loops::VERSION, ",
+ "Perl $], ",
+ "$^X on $^O"
+);

0 comments on commit 786d9cf

Please sign in to comment.