<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">commit 95302852e4ccc600289f3b575fb560e4126517f3
Author: CPAN Sandbox &lt;slaven@rezic.de&gt;
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-&gt;assert_num_equals(1, $obj ~~ 'String');
             $self-&gt;assert_num_equals(1, $obj ~~ 123);
-            $self-&gt;assert_num_equals(1, $obj ~~ ['Exception::Base']);
+## XXX This does not work anymore in 5.10.1, see perldelta/Smart match and overloading
+#           $self-&gt;assert_num_equals(1, $obj ~~ ['Exception::Base']);
         };
         die "$@" if $@;
     }
</pre></body></html>