--- trunk/t/95-frey-test-runner.t 2008/11/24 20:51:26 494 +++ trunk/t/95-frey-test-runner.t 2008/11/24 22:56:41 506 @@ -2,7 +2,7 @@ use strict; use warnings; -use Test::More tests => 1; +use Test::More tests => 3; use lib 'lib'; use Data::Dump qw/dump/; @@ -13,6 +13,9 @@ use_ok('Frey::Test::Runner'); } -if ( $debug ) { - warn Frey::Test::Runner->new->as_markup; -} +eval { Frey::Test::Runner->new( tests => 'use test' ); }; +ok( $@, 'wrong tests invocation' ); + +ok( my $o = Frey::Test::Runner->new( test => 'non-existing' ), 'correct test invocation for single scalar' ); + +diag dump $o->as_markup if $debug;