File Coverage

blib/lib/Search/GIN/DelegateToIndexed.pm
Criterion Covered Total %
statement 14 19 73.6
branch n/a
condition n/a
subroutine 5 7 71.4
pod 0 3 0.0
total 19 29 65.5


line stmt bran cond sub pod time code
1 1     1   611 use strict;
  1         2  
  1         41  
2 1     1   5 use warnings;
  1         2  
  1         56  
3             package Search::GIN::DelegateToIndexed;
4             our $VERSION = '0.10';
5 1     1   5 use Moose::Role;
  1         2  
  1         8  
6 1     1   4396 use namespace::autoclean;
  1         2  
  1         9  
7              
8             with qw(Search::GIN::Core);
9              
10             requires "ids_to_objects";
11              
12             sub extract_values {
13 3     3 0 6 my ( $self, $obj, @args ) = @_;
14 3         8 $obj->gin_extract_values($self, @args);
15             }
16              
17             sub compare_values {
18 0     0 0   my ( $self, $obj, @args ) = @_;
19 0           $obj->gin_compare_values($self, @args);
20             }
21              
22             sub objects_to_ids {
23 0     0 0   my ( $self, @objs ) = @_;
24 0           map { $_->gin_id } @objs;
  0            
25             }
26              
27             1;