Some ClassName simplification and fixes

[gitmo/Mouse.git] / t / 024-isa.t

diff --git a/t/024-isa.t b/t/024-isa.t
index ae8a594..670a611 100644 (file)
--- a/t/024-isa.t
+++ b/t/024-isa.t
@@ -84,7 +84,7 @@ for my $type (@types) {
     }
 
     for my $value (@{ $values_for_type{$type}{invalid} }) {
-        my $display = defined($value) ? $value : 'undef';
+        my $display = defined($value) ? overload::StrVal($value) : 'undef';
         my $via_new;
         throws_ok {
             $via_new = Class->new($type => $value);