[gitmo/Mouse.git] / xt / external / pod-coverage-moose.t

use strict;
use warnings;
use Test::More;
use FindBin;
use File::Spec;
use lib File::Spec->catfile($FindBin::Bin, 'lib');

plan skip_all => 'This test requires Pod::Coverage::Moose' unless eval "use Pod::Coverage::Moose; 1";
plan tests => 1;

# support Pod::Coverage::Moose
#   https://rt.cpan.org/Ticket/Display.html?id=47744

{
    local $TODO = 'Not supported';
    my $cov = Pod::Coverage::Moose->new(package => 'Foo');
    is $cov->coverage, 0.5;
}
Commit	Line	Data
5d4df3f8	1	use strict;
	2	use warnings;
	3	use Test::More;
	4	use FindBin;
	5	use File::Spec;
	6	use lib File::Spec->catfile($FindBin::Bin, 'lib');
	7
	8	plan skip_all => 'This test requires Pod::Coverage::Moose' unless eval "use Pod::Coverage::Moose; 1";
	9	plan tests => 1;
	10
	11	# support Pod::Coverage::Moose
	12	# https://rt.cpan.org/Ticket/Display.html?id=47744
	13
669d9f7e	14	{
669d9f7e	15	local $TODO = 'Not supported';
5d4df3f8	16	my $cov = Pod::Coverage::Moose->new(package => 'Foo');
5d4df3f8	17	is $cov->coverage, 0.5;
669d9f7e	18	}