File Coverage

blib/lib/Rose/HTML/Form/Field/Time/Split.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1              
2             use strict;
3 6     6   44  
  6         10  
  6         173  
4             use base qw(Rose::HTML::Form::Field::Compound Rose::HTML::Form::Field::Time);
5 6     6   51  
  6         13  
  6         2604  
6             our $VERSION = '0.606';
7              
8             # Multiple inheritence never quite works out the way I want it to...
9             Rose::HTML::Form::Field::Time->import_methods
10             (
11             'inflate_value',
12             'validate',
13             );
14              
15             Rose::HTML::Form::Field::Compound->import_methods
16             (
17             'name',
18             );
19              
20             1;