From 4a608acc6005c3f6abb2284d7bf50732d400aa71 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Fri, 2 Nov 2012 05:59:31 -0700 Subject: [PATCH] concat2.t: Under miniperl only skip one test --- t/op/concat2.t | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/t/op/concat2.t b/t/op/concat2.t index 5a9d22b..36b62bc 100644 --- a/t/op/concat2.t +++ b/t/op/concat2.t @@ -9,17 +9,19 @@ BEGIN { chdir 't' if -d 't'; @INC = '../lib'; require './test.pl'; - skip_all_if_miniperl("no dynamic loading on miniperl, no Encode"); } plan 2; +SKIP: { +skip_if_miniperl("no dynamic loading on miniperl, no Encode", 1); fresh_perl_is <<'end', "ok\n", {}, use encoding 'utf8'; map { "a" . $a } ((1)x5000); print "ok\n"; end "concat does not lose its stack pointer after utf8 upgrade [perl #78674]"; +} # This test is in the file because overload.pm uses concatenation. { package o; use overload '""' => sub { $_[0][0] } } -- 2.7.4