Use Test::DescribeMe in strict.t

nigelhorne · Sep 27, 2024 · 7a8d2e3 · 7a8d2e3
1 parent e0325d9
commit 7a8d2e3
Showing 1 changed file with 5 additions and 11 deletions.
diff --git a/t/strict.t b/t/strict.t
@@ -3,16 +3,10 @@
 use strict;
 use warnings;
 
+use Test::DescribeMe qw(author);
 use Test::Most;
+use Test::Needs 'Test::Strict';
 
-if($ENV{AUTHOR_TESTING}) {
-	eval 'use Test::Strict';
-	if($@) {
-		plan(skip_all => 'Test::Strict required for testing use strict');
-	} else {
-		all_perl_files_ok();
-		warnings_ok('lib/CGI/Info.pm');
-	}
-} else {
-	plan(skip_all => 'Author tests not required for installation');
-}
+Test::Strict->import();
+all_perl_files_ok();
+warnings_ok('lib/CGI/Info.pm');