Moose role class has ->meta in method_list since 0.90, update for that

[gitmo/Mouse.git] / t / 033-readwrite.t

diff --git a/t/033-readwrite.t b/t/033-readwrite.t
index 877152e..6a15fe9 100644 (file)
--- a/t/033-readwrite.t
+++ b/t/033-readwrite.t
@@ -11,9 +11,10 @@ do {
     # We want this attr to have a reader and writer with unconventional names,
     # and not the default rw_attr method. -- rjbs, 2008-12-04
     has 'rw_attr' => (
+        is     => 'rw',
         reader => 'read_attr',
         writer => 'write_attr',
-    );;
+    );
 };
 
 my $object = Class->new;