Branch Coverage

blib/lib/Catmandu/Store/Solr.pm
Criterion Covered Total %
branch 0 4 0.0


line true false branch
124 0 0 if ($self->{'_tx'})
153 0 0 unless (eval { do { foreach my $bag_name (@{$self->_bags_used;}) { $self->bag($bag_name)->commit; } ; $self->{'_tx'} = 1; @res = &$sub(); foreach my $bag_name (@{$self->_bags_used;}) { $self->bag($bag_name)->commit; } ; $solr->commit; $self->{'_tx'} = 0; 1 } })