Permalink
Browse files

RT#75209: "use base Exporter" => "use Exporter 'import'"

Aboid using 'base.pm' with no benefit.
Use Exporter as recommended.
  • Loading branch information...
1 parent 5984e7a commit 92fa1527614c90c39fb7e55158da2472415d0c3e @dolmen committed Feb 23, 2012
Showing with 4 additions and 4 deletions.
  1. +2 −2 lib/MooX/Types/MooseLike.pm
  2. +1 −1 lib/MooX/Types/MooseLike/Base.pm
  3. +1 −1 lib/MooX/Types/MooseLike/Numeric.pm
@@ -1,6 +1,6 @@
use strictures 1;
package MooX::Types::MooseLike;
-use base qw(Exporter);
+use Exporter 5.57 'import';
sub register_types {
my ($type_definitions, $into) = @_;
@@ -59,7 +59,7 @@ MooX::Types::MooseLike - some Moosish types and a typer builder
# but the API to build new types is Experimental
package MyApp::Types;
use MooX::Types::MooseLike::Base;
- use base qw(Exporter);
+ use Exporter 'import';
our @EXPORT_OK = ();
my $defs = [{
name => 'MyType',
@@ -4,7 +4,7 @@ package MooX::Types::MooseLike::Base;
use Scalar::Util qw(blessed);
use List::Util;
use MooX::Types::MooseLike;
-use base qw(Exporter);
+use Exporter 5.57 'import';
our @EXPORT_OK = ();
# These types act like those found in Moose::Util::TypeConstraints.
@@ -2,7 +2,7 @@ use strictures 1;
package MooX::Types::MooseLike::Numeric;
use MooX::Types::MooseLike::Base;
-use base qw(Exporter);
+use Exporter 5.57 'import';
our @EXPORT_OK = ();
my $type_definitions = [

0 comments on commit 92fa152

Please sign in to comment.