From: Alex J. G. Burzyński <ajgb@cpan.org>
Date: Thu, 19 May 2011 22:27:00 +0000 (+0200)
Subject: fix test
X-Git-Tag: release_0.009009~15
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d295de3027db04c06d30ceffed8f9faf877c64b0;p=gitmo%2FRole-Tiny.git

fix test
---

diff --git a/t/accessor-coerce.t b/t/accessor-coerce.t
index 76381bd..b9e7918 100644
--- a/t/accessor-coerce.t
+++ b/t/accessor-coerce.t
@@ -52,7 +52,7 @@ run_for 'Bar';
 
   has plus_three => (
     is => 'rw',
-    isa => quote_sub(
+    coerce => quote_sub(
       q{
         my ($value) = @_;
         $value + $plus
@@ -70,9 +70,9 @@ run_for 'Baz';
   use Sub::Quote;
   use Moo;
 
-  has dies => (
+  has plus_three => (
     is => 'rw',
-    isa => quote_sub(
+    coerce => quote_sub(
       q{
         die 'could not add three!'
       },
@@ -80,6 +80,6 @@ run_for 'Baz';
   );
 }
 
-like exception { Biff->new(plus_three => 1) }, 'could not add three!', 'Exception properly thrown';
+like exception { Biff->new(plus_three => 1) }, qr/could not add three!/, 'Exception properly thrown';
 
 done_testing;