X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fwhitespace.t;h=62405bbf2f68040eb15006b4a648c2df1a7abe1c;hb=97e130fa48aca5a1255b7014b4cbcb0c30c95328;hp=0645aed49b6b83870b0da290c42a1635b375caaa;hpb=ffce4b65b2c49bbb04919766c376625d426542f7;p=dbsrgits%2FDBIx-Class.git diff --git a/xt/whitespace.t b/xt/whitespace.t index 0645aed..62405bb 100644 --- a/xt/whitespace.t +++ b/xt/whitespace.t @@ -4,7 +4,7 @@ use strict; use Test::More; use File::Glob 'bsd_glob'; use lib 't/lib'; -use DBICTest; +use DBICTest ':GlobalLock'; require DBIx::Class; unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_whitespace') ) { @@ -20,7 +20,7 @@ unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_whitespace') ) { { no warnings 'redefine'; my $is_pm = sub { - $_[0] !~ /\./ || $_[0] =~ /\.(?:pm|pod|skip|sql|json|proto)$/i || $_[0] =~ /::/; + $_[0] !~ /\./ || $_[0] =~ /\.(?:pm|pod|skip|bash|sql|json|proto)$/i || $_[0] =~ /::/; }; *Test::EOL::_is_perl_module = $is_pm;