X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F800_shikabased%2F005-class_type.t;fp=t%2F800_shikabased%2F005-class_type.t;h=d8b89cff3182c0bb196cd04a68006430da49847f;hb=61a02a3addc8542afac0bbd222610d7e050137ce;hp=b47077c2af713b664377db019ab1b021ed6d807d;hpb=b0000b3d2779a5829883471f95f4a8548b486c82;p=gitmo%2FMouse.git

diff --git a/t/800_shikabased/005-class_type.t b/t/800_shikabased/005-class_type.t
index b47077c..d8b89cf 100644
--- a/t/800_shikabased/005-class_type.t
+++ b/t/800_shikabased/005-class_type.t
@@ -14,11 +14,11 @@ use Test::More tests => 4;
     use Mouse::TypeRegistry;
 
     class_type Headers => { class => 'Response::Headers' };
-    coerce 'Headers' => +{
-        HashRef => sub {
+    coerce 'Headers' =>
+        from 'HashRef' => via {
             Response::Headers->new(%{ $_ });
         },
-    };
+    ;
 
     has headers => (
         is     => 'rw',