X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faccessor-mixed.t;h=ecf91ca8be5e057e1dfab98ced0c7b2965da8377;hb=2f425b5770149d4ed2e59da001c3be052cbd6bc1;hp=83bc7bcd289603f7ce4268f3593f9b9db8f68869;hpb=3a9a65a4ce52f0d4bcbd4121961bb271d1e63a09;p=gitmo%2FMoo.git

diff --git a/t/accessor-mixed.t b/t/accessor-mixed.t
index 83bc7bc..ecf91ca 100644
--- a/t/accessor-mixed.t
+++ b/t/accessor-mixed.t
@@ -6,7 +6,7 @@ my @result;
 {
   package Foo;
 
-  use Class::Tiny;
+  use Moo;
 
   my @isa = (isa => sub { push @result, 'isa', $_[0] });
   my @trigger = (trigger => sub { push @result, 'trigger', $_[1] });
@@ -16,25 +16,25 @@ my @result;
   }
 
   has a1 => (
-    is => 'ro', @isa
+    is => 'rw', @isa
   );
   has a2 => (
-    is => 'ro', @isa, @trigger
+    is => 'rw', @isa, @trigger
   );
   has a3 => (
-    is => 'ro', @isa, @trigger
+    is => 'rw', @isa, @trigger
   );
   has a4 => (
-    is => 'ro', @trigger, _mkdefault('a4')
+    is => 'rw', @trigger, _mkdefault('a4')
   );
   has a5 => (
-    is => 'ro', @trigger, _mkdefault('a5')
+    is => 'rw', @trigger, _mkdefault('a5')
   );
   has a6 => (
-    is => 'ro', @isa, @trigger, _mkdefault('a6')
+    is => 'rw', @isa, @trigger, _mkdefault('a6')
   );
   has a7 => (
-    is => 'ro', @isa, @trigger, _mkdefault('a7')
+    is => 'rw', @isa, @trigger, _mkdefault('a7')
   );
 }