File Coverage

blib/lib/WebService/LiveJournal.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package WebService::LiveJournal;
2              
3 9     9   206947 use strict;
  9         22  
  9         341  
4 9     9   43 use warnings;
  9         18  
  9         255  
5 9     9   166 use v5.10;
  9         29  
  9         403  
6 9     9   46 use base qw( WebService::LiveJournal::Client );
  9         17  
  9         6692  
7              
8             # ABSTRACT: Interface to the LiveJournal API
9             our $VERSION = '0.07'; # VERSION
10              
11             sub _set_error
12             {
13             my($self, $message) = @_;
14             $self->SUPER::_set_error($message);
15             die $message;
16             }
17              
18             1;
19              
20             __END__