From: Peter Rabbitson Date: Fri, 15 Feb 2013 08:48:50 +0000 (+0100) Subject: More (temporary) kwalitee fixups X-Git-Tag: v0.08208~8 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=commitdiff_plain;h=5292b35adf732e6c40c8b68a291d4b1d3a6446a2 More (temporary) kwalitee fixups --- diff --git a/lib/DBIx/Class/Admin/Types.pm b/lib/DBIx/Class/Admin/Types.pm index 23af292..c6f37c6 100644 --- a/lib/DBIx/Class/Admin/Types.pm +++ b/lib/DBIx/Class/Admin/Types.pm @@ -1,6 +1,10 @@ package # hide from PAUSE DBIx::Class::Admin::Types; +# Workaround for https://rt.cpan.org/Public/Bug/Display.html?id=83336 +use warnings; +use strict; + use MooseX::Types -declare => [qw( DBICConnectInfo DBICArrayRef diff --git a/lib/DBIx/Class/Storage/DBI/Replicated/Types.pm b/lib/DBIx/Class/Storage/DBI/Replicated/Types.pm index 4e75aa2..fa926a9 100644 --- a/lib/DBIx/Class/Storage/DBI/Replicated/Types.pm +++ b/lib/DBIx/Class/Storage/DBI/Replicated/Types.pm @@ -4,6 +4,10 @@ package # hide from PAUSE # DBIx::Class::Storage::DBI::Replicated::Types - Types used internally by # L +# Workaround for https://rt.cpan.org/Public/Bug/Display.html?id=83336 +use warnings; +use strict; + use MooseX::Types -declare => [qw/BalancerClassNamePart Weight DBICSchema DBICStorageDBI/]; use MooseX::Types::Moose qw/ClassName Str Num/; diff --git a/xt/strictures.t b/xt/strictures.t index 9e94cfa..45cc88d 100644 --- a/xt/strictures.t +++ b/xt/strictures.t @@ -23,10 +23,6 @@ find({ return if m{^(?: maint/Makefile.PL.inc/.+ # all the maint inc snippets are auto-strictured | - lib/DBIx/Class/Admin/Types.pm # MooseX::Types undetected - | - lib/DBIx/Class/Storage/DBI/Replicated/Types.pm # MooseX::Types undetected - | lib/DBIx/Class/Storage/BlockRunner.pm # Moo undetected | t/lib/DBICTest/Util/OverrideRequire.pm # no stictures by design (load order sensitive)