From: Peter Rabbitson <ribasushi@cpan.org>
Date: Wed, 19 Dec 2012 10:36:33 +0000 (+0100)
Subject: Tighten notab/eol checks even more
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=331886ef1b5ab7a732915b8213dd525a3ea63b88;p=dbsrgits%2FDBIx-Class-Historic.git

Tighten notab/eol checks even more
---

diff --git a/xt/eol.t b/xt/eol.t
index 5d09ac3..da4ef10 100644
--- a/xt/eol.t
+++ b/xt/eol.t
@@ -15,10 +15,13 @@ unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_eol') ) {
 }
 
 # FIXME - temporary workaround for RT#82032
+# also add all scripts (no extension) and some extra extensions
+# we want to check
 {
   no warnings 'redefine';
+
   *Test::EOL::_is_perl_module = sub {
-    $_[0] =~ /\.(?:pm|pod)$/i || $_[0] =~ /::/;
+    $_[0] !~ /\./ || $_[0] =~ /\.(?:pm|pod|skip|json|proto)$/i || $_[0] =~ /::/;
   }
 }
 
diff --git a/xt/notabs.t b/xt/notabs.t
index 3c854f9..d11bd4a 100644
--- a/xt/notabs.t
+++ b/xt/notabs.t
@@ -15,10 +15,13 @@ unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_notabs') ) {
 }
 
 # FIXME - temporary workaround for RT#82033
+# also add all scripts (no extension) and some extra extensions
+# we want to check
 {
   no warnings 'redefine';
-  *Test::NoTabs::_is_perl_module = sub {
-    $_[0] =~ /\.(?:pm|pod)$/i || $_[0] =~ /::/;
+
+  *Test::EOL::_is_perl_module = sub {
+    $_[0] !~ /\./ || $_[0] =~ /\.(?:pm|pod|skip|json|proto)$/i || $_[0] =~ /::/;
   }
 }