File Coverage

blib/lib/Mojo/Rx/Subscriber.pm
Criterion Covered Total %
statement 10 12 83.3
branch 3 6 50.0
condition n/a
subroutine 4 5 80.0
pod 0 3 0.0
total 17 26 65.3


line stmt bran cond sub pod time code
1             package Mojo::Rx::Subscriber;
2 2     2   14 use strict;
  2         4  
  2         67  
3 2     2   11 use warnings FATAL => 'all';
  2         4  
  2         329  
4              
5             sub next {
6 6     6 0 38 my $self = shift;
7             # TODO: should @_ be replaced with splice @_, 0, 1?
8 6 100       18 $self->{next}->(@_) if defined $self->{next};
9             }
10              
11             sub error {
12 0     0 0 0 my $self = shift;
13             # TODO: should @_ be replaced with splice @_, 0, 1?
14 0 0       0 $self->{error}->(@_) if defined $self->{error};
15             }
16              
17             sub complete {
18 1     1 0 5 my $self = shift;
19 1 50       5 $self->{complete}->() if defined $self->{complete};
20             }
21              
22             1;