some cleanup

[gitmo/MooseX-Types-Path-Class.git] / t / perlcritic.t

diff --git a/t/perlcritic.t b/t/perlcritic.t
index afde8f4..134bdfd 100644 (file)
--- a/t/perlcritic.t
+++ b/t/perlcritic.t
@@ -4,7 +4,6 @@ use warnings FATAL => 'all';
 use strict;
 use File::Spec;
 use Test::More;
-use English qw(-no_match_vars);
 
 if ( not $ENV{TEST_AUTHOR} ) {
     my $msg
@@ -13,8 +12,7 @@ if ( not $ENV{TEST_AUTHOR} ) {
 }
 
 eval { require Test::Perl::Critic; };
-
-if ($EVAL_ERROR) {
+if ($@) {
     my $msg = 'Test::Perl::Critic required to criticise code';
     plan( skip_all => $msg );
 }