File Coverage

blib/lib/Catmandu/Store/VIAF/Bag.pm
Criterion Covered Total %
statement 13 15 86.6
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 20 90.0


line stmt bran cond sub pod time code
1             package Catmandu::Store::VIAF::Bag;
2              
3 2     2   6 use strict;
  2         3  
  2         56  
4 2     2   6 use warnings;
  2         2  
  2         40  
5              
6 2     2   8 use Catmandu::Sane;
  2         5  
  2         13  
7 2     2   255 use Moo;
  2         2  
  2         8  
8              
9 2     2   1071 use Catmandu::VIAF::API;
  0            
  0            
10              
11             with 'Catmandu::Bag';
12              
13             sub generator {
14             my $self = shift;
15             }
16              
17             sub get {
18             my ($self, $id) = @_;
19             my $a = Catmandu::VIAF::API->new(
20             term => $id,
21             lang => $self->store->lang,
22             fallback_lang => $self->store->fallback_lang
23             );
24             return $a->id();
25             }
26              
27             sub add {
28             my ($self, $data) = @_;
29             Catmandu::NotImplemented->throw(
30             message => 'Adding item to store not supported.'
31             );
32             }
33              
34             sub update {
35             my ($self, $id, $data) = @_;
36             Catmandu::NotImplemented->throw(
37             message => 'Updating item in store not supported.'
38             );
39             }
40              
41             sub delete {
42             my ($self, $id) = @_;
43             Catmandu::NotImplemented->throw(
44             message => 'Deleting item from store not supported.'
45             );
46             }
47              
48             sub delete_all {
49             my $self = shift;
50             Catmandu::NotImplemented->throw(
51             message => 'Deleting items from store not supported.'
52             );
53             }
54              
55             1;
56             __END__