commit 95302852e4ccc600289f3b575fb560e4126517f3
Author: CPAN Sandbox <[email protected]>
Date:   Thu Aug 13 00:23:52 2009 +0200

   test on 5.10.1 works now

diff --git a/t/tlib/Exception/BaseTest.pm b/t/tlib/Exception/BaseTest.pm
index a0da391..6c749ec 100644
--- a/t/tlib/Exception/BaseTest.pm
+++ b/t/tlib/Exception/BaseTest.pm
@@ -575,7 +575,8 @@ sub test_overload {
        eval q{
            $self->assert_num_equals(1, $obj ~~ 'String');
            $self->assert_num_equals(1, $obj ~~ 123);
-            $self->assert_num_equals(1, $obj ~~ ['Exception::Base']);
+## XXX This does not work anymore in 5.10.1, see perldelta/Smart match and overloading
+#           $self->assert_num_equals(1, $obj ~~ ['Exception::Base']);
        };
        die "$@" if $@;
    }