summaryrefslogtreecommitdiff
path: root/cpan/Test-Simple/t/Test-Stream-Event.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Test-Simple/t/Test-Stream-Event.t')
-rw-r--r--cpan/Test-Simple/t/Test-Stream-Event.t30
1 files changed, 0 insertions, 30 deletions
diff --git a/cpan/Test-Simple/t/Test-Stream-Event.t b/cpan/Test-Simple/t/Test-Stream-Event.t
deleted file mode 100644
index 1351059e45..0000000000
--- a/cpan/Test-Simple/t/Test-Stream-Event.t
+++ /dev/null
@@ -1,30 +0,0 @@
-use strict;
-use warnings;
-
-use Test::Stream;
-use Test::More;
-
-use ok 'Test::Stream::Event';
-
-can_ok('Test::Stream::Event', qw/context created in_subtest/);
-
-my $ok = eval { Test::Stream::Event->new(); 1 };
-my $err = $@;
-ok(!$ok, "Died");
-like($err, qr/No context provided/, "Need context");
-
-{
- package My::MockEvent;
- use Test::Stream::Event(
- accessors => [qw/foo bar baz/],
- );
-}
-
-can_ok('My::MockEvent', qw/foo bar baz/);
-isa_ok('My::MockEvent', 'Test::Stream::Event');
-
-my $one = My::MockEvent->new('fake');
-
-can_ok('Test::Stream::Context', 'mockevent');
-
-done_testing;