Use MooseX::Role::WithOverloading.

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Exception / Basic.pm

diff --git a/lib/Catalyst/Exception/Basic.pm b/lib/Catalyst/Exception/Basic.pm
index 7d963e8..6530a6f 100644 (file)
--- a/lib/Catalyst/Exception/Basic.pm
+++ b/lib/Catalyst/Exception/Basic.pm
@@ -1,6 +1,6 @@
 package Catalyst::Exception::Basic;
 
-use Moose::Role;
+use MooseX::Role::WithOverloading;
 use Carp;
 use namespace::clean -except => 'meta';
 
@@ -12,10 +12,6 @@ has message => (
     default => sub { $! || '' },
 );
 
-use overload
-    q{""}    => \&as_string,
-    fallback => 1;
-
 sub as_string {
     my ($self) = @_;
     return $self->message;