From 46b1c8bbe043713c3bb118740a5e68d13cde6b5c Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Wed, 28 Apr 2010 21:56:43 +0200
Subject: use new parameterized roles

---
 lib/MooseX/Privacy/Meta/Class.pm | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

(limited to 'lib/MooseX')

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__
-- 
cgit 1.4.1