From 9a819c53ea88d482b3a59b4503ff7bf8c5483ee6 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <dakkar@thenautilus.net>
Date: Wed, 9 Nov 2011 17:55:15 +0000
Subject: avoid warns printing some exceptions

---
 Data-MultiValued/lib/Data/MultiValued/Exceptions.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Data-MultiValued/lib/Data/MultiValued/Exceptions.pm b/Data-MultiValued/lib/Data/MultiValued/Exceptions.pm
index 571db0a..8d444c0 100644
--- a/Data-MultiValued/lib/Data/MultiValued/Exceptions.pm
+++ b/Data-MultiValued/lib/Data/MultiValued/Exceptions.pm
@@ -11,7 +11,7 @@ has value => (
 sub as_string {
     my ($self) = @_;
 
-    my $str = $self->message . $self->value;
+    my $str = $self->message . ($self->value // '<undef>');
     $str .= "\n\n" . $self->stack_trace->as_string;
 
     return $str;
-- 
cgit v1.2.3