Change the skip logic on the unicode tests so that they don't rely on

miniperl's "dynamic loading unavailable" message

p4raw-id: //depot/perl@22424

1 files changed, 2 insertions, 3 deletions

diff --git a/t/uni/tr_sjis.t b/t/uni/tr_sjis.t
index 732eb1ab0b..6fda9f2807 100644
--- a/t/uni/tr_sjis.t
+++ b/t/uni/tr_sjis.t
@@ -22,9 +22,8 @@ BEGIN {
         print "1..0 # Skip: PerlIO required\n";
         exit 0;
     }
-    eval 'use Encode';
-    if ($@ =~ /dynamic loading not available/) {
-        print "1..0 # Skip: no dynamic loading, no Encode\n";
+    if ($ENV{PERL_CORE_MINITEST}) {
+        print "1..0 # Skip: no dynamic loading on miniperl, no Encode\n";
         exit 0;
     }
     $| = 1;