File Coverage

blib/lib/Protocol/XMPP/Element/Proceed.pm
Criterion Covered Total %
statement 9 12 75.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 17 76.4


line stmt bran cond sub pod time code
1             package Protocol::XMPP::Element::Proceed;
2              
3 1     1   244942 use strict;
  1         3  
  1         50  
4 1     1   6 use warnings;
  1         3  
  1         87  
5 1     1   8 use parent qw(Protocol::XMPP::ElementBase);
  1         2  
  1         9  
6              
7             our $VERSION = '0.007'; ## VERSION
8              
9             =head1 NAME
10              
11             =head1 SYNOPSIS
12              
13             =head1 DESCRIPTION
14              
15             =head1 METHODS
16              
17             =cut
18              
19             sub end_element {
20 0     0 1   my $self = shift;
21 0           $self->dispatch_event('starttls');
22 0           $self;
23             }
24              
25             1;
26              
27             __END__