File Coverage

blib/lib/WWW/Jawbone/Up/Score/Move.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 WWW::Jawbone::Up::Score::Move;
2              
3 1     1   33 use 5.010;
  1         7  
  1         46  
4 1     1   6 use strict;
  1         2  
  1         37  
5 1     1   6 use warnings;
  1         1  
  1         33  
6              
7 1     1   6 use base 'WWW::Jawbone::Up::JSON';
  1         1  
  1         194  
8              
9             __PACKAGE__->add_accessors(
10             qw(distance active_time longest_active longest_idle));
11             __PACKAGE__->add_accessors({
12             steps => 'bg_steps',
13             active_burn => 'calories',
14             resting_burn => 'bmr_calories',
15             });
16              
17             sub total_burn {
18 1     1 0 3 my $self = shift;
19 1         7 return $self->active_burn + $self->resting_burn;
20             }
21              
22             1;