Unfuck my subtypes patch, duh. Tests now pass again.

[catagits/Catalyst-Engine-STOMP.git] / lib / Catalyst / Controller / MessageDriven.pm

diff --git a/lib/Catalyst/Controller/MessageDriven.pm b/lib/Catalyst/Controller/MessageDriven.pm
index 83ec775..a259b2f 100644 (file)
--- a/lib/Catalyst/Controller/MessageDriven.pm
+++ b/lib/Catalyst/Controller/MessageDriven.pm
@@ -50,7 +50,7 @@ Serializes the response from C<< $c->stash->{response} >>
 =cut
 
 class_type 'Data::Serializer';
-my $serializer_t = subtype 'Data::Serializer';
+my $serializer_t = subtype 'Data::Serializer', where { 1 };
 coerce $serializer_t, from 'Str',
     via { Data::Serializer->new( serializer => $_ ) };