summaryrefslogtreecommitdiff
path: root/cpan/Test-Simple/t/Test-Stream-IOSets.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Test-Simple/t/Test-Stream-IOSets.t')
-rw-r--r--cpan/Test-Simple/t/Test-Stream-IOSets.t31
1 files changed, 0 insertions, 31 deletions
diff --git a/cpan/Test-Simple/t/Test-Stream-IOSets.t b/cpan/Test-Simple/t/Test-Stream-IOSets.t
deleted file mode 100644
index c2da17eca3..0000000000
--- a/cpan/Test-Simple/t/Test-Stream-IOSets.t
+++ /dev/null
@@ -1,31 +0,0 @@
-use strict;
-use warnings;
-
-use Test::Stream;
-use Test::MostlyLike;
-use Test::More;
-
-use ok 'Test::Stream::IOSets';
-
-my ($out, $err) = Test::Stream::IOSets->open_handles;
-ok($out && $err, "got 2 handles");
-ok(close($out), "Close stdout");
-ok(close($err), "Close stderr");
-
-my $one = Test::Stream::IOSets->new;
-isa_ok($one, 'Test::Stream::IOSets');
-mostly_like(
- $one,
- { ':legacy' => [], ':utf8' => undef },
- "Legacy encoding is set",
-);
-
-ok($one->init_encoding('utf8'), "init utf8");
-
-mostly_like(
- $one,
- { ':legacy' => [], ':utf8' => [] },
- "utf8 encoding is set",
-);
-
-done_testing;