diff options
author | doy <doy@tozt.net> | 2009-04-10 23:09:00 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2009-04-10 23:09:00 -0500 |
commit | 1d9006ef273daf2b564ad5f5f5231264c7b5f5a9 (patch) | |
tree | 4fe6b6135b852375dfce33ae860f47e039604b7b | |
parent | 8a29479923534f7d01677e953b813dccd374b3a0 (diff) | |
download | moosex-nonmoose-1d9006ef273daf2b564ad5f5f5231264c7b5f5a9.tar.gz moosex-nonmoose-1d9006ef273daf2b564ad5f5f5231264c7b5f5a9.zip |
eh, let's just overwrite extends, extends_nonmoose is too wordy
-rw-r--r-- | lib/MooseX/NonMoose.pm | 4 | ||||
-rw-r--r-- | t/001-basic.t | 2 | ||||
-rw-r--r-- | t/002-methods.t | 2 | ||||
-rw-r--r-- | t/003-attrs.t | 2 | ||||
-rw-r--r-- | t/010-immutable.t | 2 | ||||
-rw-r--r-- | t/020-BUILD.t | 4 |
6 files changed, 8 insertions, 8 deletions
diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm index 383c793..c7c542d 100644 --- a/lib/MooseX/NonMoose.pm +++ b/lib/MooseX/NonMoose.pm @@ -3,10 +3,10 @@ use Moose (); use Moose::Exporter; Moose::Exporter->setup_import_methods( - with_caller => ['extends_nonmoose'], + with_caller => ['extends'], ); -sub extends_nonmoose { +sub extends { my $caller = shift; my @superclasses = @_; diff --git a/t/001-basic.t b/t/001-basic.t index 4b4164d..13d2a6b 100644 --- a/t/001-basic.t +++ b/t/001-basic.t @@ -13,7 +13,7 @@ sub new { package Foo::Moose; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo'; +extends 'Foo'; package main; my $foo = Foo->new; diff --git a/t/002-methods.t b/t/002-methods.t index 1de5ea4..4ca06dc 100644 --- a/t/002-methods.t +++ b/t/002-methods.t @@ -13,7 +13,7 @@ sub baz { ref(shift) } package Foo::Moose; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo'; +extends 'Foo'; sub bar { 'Foo::Moose' } diff --git a/t/003-attrs.t b/t/003-attrs.t index 9e222d0..2a92ab0 100644 --- a/t/003-attrs.t +++ b/t/003-attrs.t @@ -19,7 +19,7 @@ sub foo { package Foo::Moose; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo'; +extends 'Foo'; has bar => ( is => 'rw', diff --git a/t/010-immutable.t b/t/010-immutable.t index 092d58c..5ceb251 100644 --- a/t/010-immutable.t +++ b/t/010-immutable.t @@ -22,7 +22,7 @@ sub quux { ref(shift) } package Foo::Moose; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo'; +extends 'Foo'; has bar => ( is => 'rw', diff --git a/t/020-BUILD.t b/t/020-BUILD.t index e2627f8..8473dd3 100644 --- a/t/020-BUILD.t +++ b/t/020-BUILD.t @@ -13,7 +13,7 @@ sub new { package Foo::Moose; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo'; +extends 'Foo'; has class => ( is => 'rw', @@ -34,7 +34,7 @@ sub BUILD { package Foo::Moose::Sub; use Moose; use MooseX::NonMoose; -extends_nonmoose 'Foo::Moose'; +extends 'Foo::Moose'; has bar => ( is => 'rw', |