X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2Fmethods%2Fminlen%2Fbytes.t;fp=t%2Fmethods%2Fminlen%2Fbytes.t;h=0000000000000000000000000000000000000000;hb=386630c145754930ffc3a3b0988dd0108f4394db;hp=643f11856ddce479e542cd39041e5b95f1bd4d12;hpb=36958ebe8b4c296f858f6b5df8f629cdb341812d;p=perl%2Fmodules%2Fre-engine-Plugin.git

diff --git a/t/methods/minlen/bytes.t b/t/methods/minlen/bytes.t
deleted file mode 100644
index 643f118..0000000
--- a/t/methods/minlen/bytes.t
+++ /dev/null
@@ -1,23 +0,0 @@
-=pod
-
-C<minlen> speaks bytes, not characters.
-
-=cut
-
-use strict;
-use Test::More tests => 3;
-use re::engine::Plugin (
-    comp => sub { shift->minlen(5) },
-    exec => sub {
-        my ($re, $str) = @_;
-        pass "Called with $str";
-    },
-);
-
-my $str = "ævar";
-is(length $str, 5, "$str is 5 char long"); # Chars
-$str =~ /pattern/; # no ->exec
-
-chop $str;
-is(length $str, 4, "$str is 4 char long"); # Chars
-$str =~ /pattern/; # yes ->exec