X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fre-engine-Plugin.git;a=blobdiff_plain;f=t%2Fmethods%2Fstr%2Ftypes.t;h=ed45fb1b774c6879752d60078ce55ef4311f6c93;hp=f79ba36349c7f4de9fa36c914c61b643a3368b9b;hb=dd88e700bfcc92fc03db9d994ec747ca1c14ade7;hpb=447aa9bcb55632cf669454868679169602a28fe2

diff --git a/t/methods/str/types.t b/t/methods/str/types.t
index f79ba36..ed45fb1 100644
--- a/t/methods/str/types.t
+++ b/t/methods/str/types.t
@@ -4,18 +4,18 @@ use re::engine::Plugin (
     exec => sub {
         my ($re, $str) = @_;
 
-        is_deeply($str, $re->str);
+        isa_ok($str, $re->pattern);
 
         return 1;
     },
 );
 
 my $sv;
-"SCALAR" =~ \$sv;
-"REF"    =~ \\$sv;
-"ARRAY"  =~ [];
-"HASH"   =~ {};
-"GLOB"   =~ \*STDIN;
-"CODE"   =~ sub {};
-"main"   =~ bless {} => "main";
+\$sv    =~ "SCALAR";
+\\$sv   =~ "REF";
+[]      =~ "ARRAY";
+{}      =~ "HASH";
+\*STDIN =~ "GLOB";
+sub {}  =~ "CODE";
+bless({} => "main") =~ "main"