diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-04-28 21:56:43 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-04-28 21:56:43 +0200 |
| commit | 46b1c8bbe043713c3bb118740a5e68d13cde6b5c (patch) | |
| tree | 19059f7c3a617f7def0a16281b1e5d7a0d00865f | |
| parent | parameterized role for private and protected (diff) | |
| download | moosex-privacy-46b1c8bbe043713c3bb118740a5e68d13cde6b5c.tar.gz | |
use new parameterized roles
| -rw-r--r-- | lib/MooseX/Privacy/Meta/Class.pm | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lib/MooseX/Privacy/Meta/Class.pm b/lib/MooseX/Privacy/Meta/Class.pm index 71bfa0a..0361035 100644 --- a/lib/MooseX/Privacy/Meta/Class.pm +++ b/lib/MooseX/Privacy/Meta/Class.pm @@ -3,14 +3,17 @@ package MooseX::Privacy::Meta::Class; use Moose::Role; use Moose::Meta::Class; -with qw/MooseX::Privacy::Meta::Class::Private - MooseX::Privacy::Meta::Class::Protected/; +with ( + 'MooseX::Privacy::Meta::Class::Role' => { name => 'protected' }, + 'MooseX::Privacy::Meta::Class::Role' => { name => 'private' }, +); package Moose::Meta::Attribute::Custom::Trait::Private; -sub register_implementation { 'MooseX::Privacy::Trait::Private' } +sub register_implementation {'MooseX::Privacy::Trait::Private'} package Moose::Meta::Attribute::Custom::Trait::Protected; -sub register_implementation { 'MooseX::Privacy::Trait::Protected' } +sub register_implementation {'MooseX::Privacy::Trait::Protected'} + 1; __END__ |