Workaround RT #57144, caused by Perl_call_sv()'s bug

[gitmo/Mouse.git] / t / 900_mouse_bugs / 009_RT57144.t

diff --git a/t/900_mouse_bugs/009_RT57144.t b/t/900_mouse_bugs/009_RT57144.t
index d2660aa..ede5e1d 100644 (file)
--- a/t/900_mouse_bugs/009_RT57144.t
+++ b/t/900_mouse_bugs/009_RT57144.t
@@ -35,11 +35,7 @@ package main;
 use strict;
 use warnings;
 
-pass 'The problem remains ...';
-
-if(0) {
-    my $hoge = Hoge->new;
-    is $hoge->msg, "HOGE";
-}
+my $hoge = Hoge->new;
+is $hoge->msg, "HOGE";
 
 done_testing;