From f507d6f025503d42282fe562873d505fd9969d0d Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Wed, 30 Jun 2010 20:30:14 +0100 Subject: [PATCH] Convert Fcntl and PerlIO::encoding's tests to Test::More. Remove one vestigial mention of MacOS. --- ext/Fcntl/t/mode.t | 6 +----- ext/PerlIO-encoding/t/fallback.t | 4 +--- 2 files changed, 2 insertions(+), 8 deletions(-) diff --git a/ext/Fcntl/t/mode.t b/ext/Fcntl/t/mode.t index 57bd0c4..3114a0b 100644 --- a/ext/Fcntl/t/mode.t +++ b/ext/Fcntl/t/mode.t @@ -1,10 +1,6 @@ #!./perl -w -BEGIN { - require 'test.pl'; -} - -plan tests => 2; +use Test::More tests => 2; use File::Temp; use Fcntl qw(:mode); diff --git a/ext/PerlIO-encoding/t/fallback.t b/ext/PerlIO-encoding/t/fallback.t index 17ac8b1..3944f7d 100644 --- a/ext/PerlIO-encoding/t/fallback.t +++ b/ext/PerlIO-encoding/t/fallback.t @@ -1,8 +1,6 @@ #!./perl BEGIN { - push @INC, "::lib:$MacPerl::Architecture:" if $^O eq 'MacOS'; - require "../../t/test.pl"; skip_all("No perlio") unless (find PerlIO::Layer 'perlio'); if (ord("A") == 193) { print "1..0 # Skip: EBCDIC\n"; @@ -12,7 +10,7 @@ BEGIN { print "1..0 # Skip: No Encode\n"; exit 0; } - plan (9); + use Test::More tests => 9; import Encode qw(:fallback_all); } -- 2.7.4