1 files changed, 20 insertions, 20 deletions
diff --git a/lib/Data/MultiValued/Exceptions.pm b/lib/Data/MultiValued/Exceptions.pm
index c908388..141ff63 100644
--- a/lib/Data/MultiValued/Exceptions.pm
+++ b/lib/Data/MultiValued/Exceptions.pm
@@ -1,6 +1,6 @@
 package Data::MultiValued::Exceptions;
 {
-  $Data::MultiValued::Exceptions::VERSION = '0.0.1_3';
+  $Data::MultiValued::Exceptions::VERSION = '0.0.1_4';
 }
 {
   $Data::MultiValued::Exceptions::DIST = 'Data-MultiValued';
@@ -11,13 +11,21 @@ package Data::MultiValued::Exceptions;
 
 package Data::MultiValued::Exceptions::NotFound;
 {
-  $Data::MultiValued::Exceptions::NotFound::VERSION = '0.0.1_3';
+  $Data::MultiValued::Exceptions::NotFound::VERSION = '0.0.1_4';
 }
 {
   $Data::MultiValued::Exceptions::NotFound::DIST = 'Data-MultiValued';
 }{
 use Moose;
-extends 'Throwable::Error';
+with 'Throwable';
+use overload
+  q{""}    => 'as_string',
+  fallback => 1;
+
+has message => (
+    is => 'ro',
+    required => 1,
+);
 
 has value => (
     is => 'ro',
@@ -28,7 +36,6 @@ sub as_string {
     my ($self) = @_;
 
     my $str = $self->message . ($self->value // '<undef>');
-    $str .= "\n\n" . $self->stack_trace->as_string;
 
     return $str;
 }
@@ -37,7 +44,7 @@ sub as_string {
 
 package Data::MultiValued::Exceptions::TagNotFound;
 {
-  $Data::MultiValued::Exceptions::TagNotFound::VERSION = '0.0.1_3';
+  $Data::MultiValued::Exceptions::TagNotFound::VERSION = '0.0.1_4';
 }
 {
   $Data::MultiValued::Exceptions::TagNotFound::DIST = 'Data-MultiValued';
@@ -53,7 +60,7 @@ has '+message' => (
 
 package Data::MultiValued::Exceptions::RangeNotFound;
 {
-  $Data::MultiValued::Exceptions::RangeNotFound::VERSION = '0.0.1_3';
+  $Data::MultiValued::Exceptions::RangeNotFound::VERSION = '0.0.1_4';
 }
 {
   $Data::MultiValued::Exceptions::RangeNotFound::DIST = 'Data-MultiValued';
@@ -69,24 +76,23 @@ has '+message' => (
 
 package Data::MultiValued::Exceptions::BadRange;
 {
-  $Data::MultiValued::Exceptions::BadRange::VERSION = '0.0.1_3';
+  $Data::MultiValued::Exceptions::BadRange::VERSION = '0.0.1_4';
 }
 {
   $Data::MultiValued::Exceptions::BadRange::DIST = 'Data-MultiValued';
 }{
 use Moose;
-extends 'Throwable::Error';
+with 'Throwable';
+use overload
+  q{""}    => 'as_string',
+  fallback => 1;
 
 has ['from','to'] => ( is => 'ro', required => 1 );
-has '+message' => (
-    default => 'invalid range: ',
-);
 
 sub as_string {
     my ($self) = @_;
 
-    my $str = $self->message . $self->from . ', ' . $self->to;
-    $str .= "\n\n" . $self->stack_trace->as_string;
+    my $str = 'invalid range: ' . $self->from . ', ' . $self->to;
 
     return $str;
 }
@@ -106,7 +112,7 @@ Data::MultiValued::Exceptions - exception classes
 
 =head1 VERSION
 
-version 0.0.1_3
+version 0.0.1_4
 
 =head1 DESCRIPTION
 
@@ -127,8 +133,6 @@ tags. Stringifies to:
 
   tag not found: $value
 
-  $stack_trace
-
 =head2 C<Data::MultiValued::Exceptions::RangeNotFound>
 
 Subclass of L</Data::MultiValued::Exceptions::NotFound>, for
@@ -136,8 +140,6 @@ ranges. Stringifies to:
 
   no range found for value: $value
 
-  $stack_trace
-
 =head2 C<Data::MultiValued::Exceptions::BadRange>
 
 Thrown when an invalid range is supplied to a method. An invalid range
@@ -147,8 +149,6 @@ Stringifies to:
 
   invalid range: $from, $to
 
-  $stack_trace
-
 =head1 AUTHOR
 
 Gianni Ceccarelli <dakkar@thenautilus.net>