Commits

Toby Inkster committed e27c9f3

update xt test cases

Comments (0)

Files changed (7)

examples/funky-circle.pl

 			$self->diameter,
 			$self->circumference,
 			$self->area,
-		);	
+		);
 	}
 
 	__PACKAGE__->meta->make_immutable;

meta/changes.pret

 		item "Include example scripts."^^Documentation;
 		item "Show MooseX::CustomInitArgs in example, and include in SEE ALSO."^^Documentation;
 		item "Document the test suite."^^Documentation;
+		item "Document the metaobject interface (albeit briefly)."^^Documentation;
 	].
 
 	no thanks;
 	use Moose;
 	use MooseX::FunkyAttributes;
-	use constant PI => 3.14159; 
+	use constant PI => 3.14159;
 	has radius => (
 		is         => 'rw',
 		isa        => 'Num',
 	no thanks;
 	use Moose;
 	use MooseX::FunkyAttributes;
-	use constant PI => 3.14159; 
+	use constant PI => 3.14159;
 	has radius => (
 		traits     => [ InsideOutAttribute ],
 		is         => 'rw',

xt/02pod_coverage.t

+use XT::Util;
 use Test::More;
 use Test::Pod::Coverage;
 
-my @modules = qw(MooseX::FunkyAttributes);
-pod_coverage_ok($_, "$_ is covered") for @modules;
-done_testing(scalar @modules);
+plan skip_all => __CONFIG__->{skip_all}
+	if __CONFIG__->{skip_all};
 
+if ( __CONFIG__->{modules} )
+{
+	my @modules = @{ __CONFIG__->{modules} };
+	pod_coverage_ok($_, "$_ is covered") for @modules;
+	done_testing(scalar @modules);
+}
+else
+{
+	all_pod_coverage_ok();
+}
+
+use Test::Tabs;
+all_perl_files_ok();
+use XT::Util;
+use Test::More;
+use Test::HasVersion;
+
+plan skip_all => __CONFIG__->{skip_all}
+	if __CONFIG__->{skip_all};
+
+if ( __CONFIG__->{modules} )
+{
+	my @modules = @{ __CONFIG__->{modules} };
+	pm_version_ok($_, "$_ is covered") for @modules;
+	done_testing(scalar @modules);
+}
+else
+{
+	all_pm_version_ok();
+}
+