r34059 - in /branches/upstream/libmoosex-methodattributes-perl/current: ./ lib/MooseX/ lib/MooseX/MethodAttributes/ lib/MooseX/MethodAttributes/Role/ lib/MooseX/MethodAttributes/Role/AttrContainer/ lib/MooseX/MethodAttributes/Role/Meta/ lib/MooseX/MethodAttributes/Role/Meta/Method/ t/ t/lib/
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Sat Apr 25 11:14:30 UTC 2009
Author: ansgar-guest
Date: Sat Apr 25 11:14:23 2009
New Revision: 34059
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=34059
Log:
[svn-upgrade] Integrating new upstream version, libmoosex-methodattributes-perl (0.06)
Added:
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClassMoosed.pm
Modified:
branches/upstream/libmoosex-methodattributes-perl/current/Changes
branches/upstream/libmoosex-methodattributes-perl/current/MANIFEST
branches/upstream/libmoosex-methodattributes-perl/current/META.yml
branches/upstream/libmoosex-methodattributes-perl/current/Makefile.PL
branches/upstream/libmoosex-methodattributes-perl/current/README
branches/upstream/libmoosex-methodattributes-perl/current/dist.ini
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Inheritable.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer/Inheritable.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Class.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/MaybeWrapped.pm
branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/Wrapped.pm
branches/upstream/libmoosex-methodattributes-perl/current/t/inherited.t
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/BaseClass.pm
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/OtherSubClass.pm
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClass.pm
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubSubClass.pm
branches/upstream/libmoosex-methodattributes-perl/current/t/lib/TestClass.pm
Modified: branches/upstream/libmoosex-methodattributes-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/Changes?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/Changes (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/Changes Sat Apr 25 11:14:23 2009
@@ -1,3 +1,10 @@
+0.06 Sun, 19 Apr 2009 23:03:06 + 0100
+ * Fix bug when using base, as Moose doesn't automatically inherit the
+ method metaclass from your parent class unless you use the 'extends'
+ syntax.
+ * Package on a different machine, due to reported unarchiving issues
+ on win32.
+
0.05 Wed, 1 Apr 2009 21:40:05 + 0100
* Ensure that we have an initialised metaclass to apply roles to in
AttrContainer::Inheritable, fixing bugs with non-moose base classes
Modified: branches/upstream/libmoosex-methodattributes-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/MANIFEST?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/MANIFEST (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/MANIFEST Sat Apr 25 11:14:23 2009
@@ -19,5 +19,6 @@
t/lib/BaseClass.pm
t/lib/OtherSubClass.pm
t/lib/SubClass.pm
+t/lib/SubClassMoosed.pm
t/lib/SubSubClass.pm
t/lib/TestClass.pm
Modified: branches/upstream/libmoosex-methodattributes-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/META.yml?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/META.yml (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/META.yml Sat Apr 25 11:14:23 2009
@@ -2,11 +2,12 @@
abstract: code attribute introspection
author:
- Florian Ragwitz <rafl at debian.org>
-generated_by: Dist::Zilla::Plugin::MetaYaml version 1.004
+ - Tomas Doran <bobtfish at bobtfish.net>
+generated_by: Dist::Zilla::Plugin::MetaYaml version 1.006
license: perl
name: MooseX-MethodAttributes
requires:
Moose: 0.70
MooseX::Types: 0.06
namespace::clean: 0
-version: 0.05
+version: 0.06
Modified: branches/upstream/libmoosex-methodattributes-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/Makefile.PL?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/Makefile.PL (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/Makefile.PL Sat Apr 25 11:14:23 2009
@@ -7,9 +7,9 @@
WriteMakefile(
DISTNAME => 'MooseX-MethodAttributes',
NAME => 'MooseX::MethodAttributes',
- AUTHOR => 'Florian\ Ragwitz\ \<rafl\@debian\.org\>',
+ AUTHOR => 'Florian\ Ragwitz\ \<rafl\@debian\.org\>\,\ Tomas\ Doran\ \<bobtfish\@bobtfish\.net\>',
ABSTRACT => 'code attribute introspection',
- VERSION => '0.05',
+ VERSION => '0.06',
EXE_FILES => [ qw() ],
(eval { ExtUtils::MakeMaker->VERSION(6.21) } ? (LICENSE => 'perl') : ()),
PREREQ_PM => {
Modified: branches/upstream/libmoosex-methodattributes-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/README?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/README (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/README Sat Apr 25 11:14:23 2009
@@ -1,7 +1,7 @@
This archive contains the distribution MooseX-MethodAttributes, version
-0.05:
+0.06:
code attribute introspection
Modified: branches/upstream/libmoosex-methodattributes-perl/current/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/dist.ini?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/dist.ini (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/dist.ini Sat Apr 25 11:14:23 2009
@@ -1,6 +1,7 @@
name = MooseX-MethodAttributes
-version = 0.05
+version = 0.06
author = Florian Ragwitz <rafl at debian.org>
+author = Tomas Doran <bobtfish at bobtfish.net>
license = Perl_5
copyright_holder = Florian Ragwitz
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes.pm Sat Apr 25 11:14:23 2009
@@ -2,7 +2,7 @@
use warnings;
package MooseX::MethodAttributes;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: code attribute introspection
@@ -38,7 +38,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 SYNOPSIS
@@ -66,9 +66,10 @@
=cut
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Inheritable.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Inheritable.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Inheritable.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Inheritable.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Inheritable;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: inheritable code attribute introspection
@@ -21,7 +21,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 SYNOPSIS
@@ -29,7 +29,7 @@
use base qw/MooseX::MethodAttributes::Inheritable/;
package SubClass;
- use base qw/SubClass/;
+ use base qw/BaseClass/;
sub foo : Bar {}
@@ -41,9 +41,10 @@
inheriting from other classes using it don't need to do anything special to get
their code attributes captured.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::AttrContainer;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: capture code attributes in the class' metaclass
@@ -24,7 +24,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 METHODS
@@ -34,9 +34,10 @@
See L<attributes>.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer/Inheritable.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer/Inheritable.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer/Inheritable.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/AttrContainer/Inheritable.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::AttrContainer::Inheritable;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: capture code attributes in the automatically initialized metaclass instance
@@ -15,7 +15,11 @@
before MODIFY_CODE_ATTRIBUTES => sub {
my ($class) = @_;
my $meta = find_meta($class);
- return if $meta && does_role($meta, 'MooseX::MethodAttributes::Role::Meta::Class');
+
+ return if $meta
+ && does_role($meta, 'MooseX::MethodAttributes::Role::Meta::Class')
+ && does_role($meta->method_metaclass, 'MooseX::MethodAttributes::Role::Meta::Method');
+
Moose->init_meta( for_class => $class )
unless $meta;
Moose::Util::MetaRole::apply_metaclass_roles(
@@ -35,7 +39,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 DESCRIPTION
@@ -43,9 +47,10 @@
functionality of automatically initializing a metaclass for the caller and
applying the meta roles relevant for capturing method attributes.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Class.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Class.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Class.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::Meta::Class;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: metaclass role for storing code attributes
@@ -85,7 +85,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 METHODS
@@ -114,9 +114,10 @@
that have attributes. Baseclass methods come before subclass methods. Methods
of one class have the order they have been declared in.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::Meta::Method;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: metamethod role allowing code attribute introspection
@@ -34,7 +34,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 ATTRIBUTES
@@ -51,9 +51,10 @@
Builds the value of the C<attributes> attribute based on the attributes
captured in the associated meta class.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/MaybeWrapped.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/MaybeWrapped.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/MaybeWrapped.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/MaybeWrapped.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::Meta::Method::MaybeWrapped;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: proxy attributes of wrapped methods if their metaclass supports it
@@ -26,11 +26,12 @@
=head1 VERSION
-version 0.05
+version 0.06
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/Wrapped.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/Wrapped.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/Wrapped.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/lib/MooseX/MethodAttributes/Role/Meta/Method/Wrapped.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package MooseX::MethodAttributes::Role::Meta::Method::Wrapped;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
# ABSTRACT: wrapped metamethod role allowing code attribute introspection
@@ -27,7 +27,7 @@
=head1 VERSION
-version 0.05
+version 0.06
=head1 METHODS
@@ -35,9 +35,10 @@
Gets the list of code attributes of the original method this meta method wraps.
-=head1 AUTHOR
+=head1 AUTHORS
Florian Ragwitz <rafl at debian.org>
+ Tomas Doran <bobtfish at bobtfish.net>
=head1 COPYRIGHT AND LICENSE
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/inherited.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/inherited.t?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/inherited.t (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/inherited.t Sat Apr 25 11:14:23 2009
@@ -1,13 +1,38 @@
use strict;
use warnings;
-use Test::More tests => 4;
+use Test::More tests => 9;
use FindBin;
use lib "$FindBin::Bin/lib";
+use Moose::Util qw/does_role/;
+
BEGIN { use_ok 'SubClass'; }
+BEGIN { use_ok 'SubClassMoosed'; }
my $meta = SubClass->meta;
+my $meta2 = SubClassMoosed->meta;
+
+ok( does_role(
+ BaseClass->meta->method_metaclass
+ => 'MooseX::MethodAttributes::Role::Meta::Method'
+ ) => 'BaseClass does method meta role'
+);
+ok( does_role(
+ $meta->method_metaclass
+ => 'MooseX::MethodAttributes::Role::Meta::Method'
+ ) => 'SubClass does method meta role'
+);
+ok( does_role(
+ $meta2->method_metaclass
+ => 'MooseX::MethodAttributes::Role::Meta::Method'
+ ) => 'SubClassMoosed does method meta role'
+);
+
+is_deeply(
+ $meta2->get_method('bar')->attributes,
+ ['Bar'],
+);
is_deeply(
$meta->get_method('bar')->attributes,
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/BaseClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/BaseClass.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/BaseClass.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/BaseClass.pm Sat Apr 25 11:14:23 2009
@@ -2,17 +2,17 @@
use warnings;
package BaseClass::Meta::Role;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use Moose::Role;
package BaseClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use Moose;
use Moose::Util::MetaRole;
-BEGIN {
+BEGIN {
Moose::Util::MetaRole::apply_metaclass_roles(
for_class => __PACKAGE__,
metaclass_roles => [qw/ BaseClass::Meta::Role /],
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/OtherSubClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/OtherSubClass.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/OtherSubClass.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/OtherSubClass.pm Sat Apr 25 11:14:23 2009
@@ -2,7 +2,7 @@
use warnings;
package OtherSubClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use base qw/BaseClass/;
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClass.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClass.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClass.pm Sat Apr 25 11:14:23 2009
@@ -2,14 +2,14 @@
use warnings;
package SubClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
-use base qw/BaseClass/;
+use Moose;
+BEGIN { extends 'BaseClass'; }
sub bar : Bar {}
-use Moose;
before affe => sub {};
no Moose;
Added: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClassMoosed.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClassMoosed.pm?rev=34059&op=file
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClassMoosed.pm (added)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubClassMoosed.pm Sat Apr 25 11:14:23 2009
@@ -1,0 +1,17 @@
+use strict;
+use warnings;
+
+package SubClassMoosed;
+our $VERSION = '0.06';
+
+
+use base qw/BaseClass/;
+
+use Moose;
+
+sub bar : Bar {}
+
+before affe => sub {};
+no Moose;
+
+1;
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubSubClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubSubClass.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubSubClass.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/SubSubClass.pm Sat Apr 25 11:14:23 2009
@@ -2,7 +2,7 @@
use warnings;
package SubSubClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use base qw/OtherSubClass/;
Modified: branches/upstream/libmoosex-methodattributes-perl/current/t/lib/TestClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-methodattributes-perl/current/t/lib/TestClass.pm?rev=34059&op=diff
==============================================================================
--- branches/upstream/libmoosex-methodattributes-perl/current/t/lib/TestClass.pm (original)
+++ branches/upstream/libmoosex-methodattributes-perl/current/t/lib/TestClass.pm Sat Apr 25 11:14:23 2009
@@ -1,5 +1,5 @@
package TestClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use Moose;
@@ -10,7 +10,7 @@
after foo => sub {};
package SubClass;
-our $VERSION = '0.05';
+our $VERSION = '0.06';
use Moose;
More information about the Pkg-perl-cvs-commits
mailing list