File Coverage

blib/lib/Adapter/Async/Bus.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             package Adapter::Async::Bus;
2             $Adapter::Async::Bus::VERSION = '0.018';
3 3     3   19 use strict;
  3         5  
  3         137  
4 3     3   17 use warnings;
  3         6  
  3         150  
5              
6 3     3   18 use parent qw(Mixin::Event::Dispatch);
  3         5  
  3         31  
7 3     3   28645 use constant EVENT_DISPATCH_ON_FALLBACK => 0;
  3         8  
  3         526  
8              
9             =head1 NAME
10              
11             Adapter::Async::Bus -
12              
13             =head1 VERSION
14              
15             version 0.018
16              
17             =head1 SYNOPSIS
18              
19             =head1 DESCRIPTION
20              
21             =head1 METHODS
22              
23             =cut
24              
25 4     4 0 10 sub new { my $class = shift; bless { @_ }, $class }
  4         102  
26              
27             =head1 EVENTS
28              
29             =cut
30              
31             1;
32              
33             __END__