File Coverage

blib/lib/Alzabo/Runtime/RowState/Deleted.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition n/a
subroutine 4 8 50.0
pod 0 3 0.0
total 16 27 59.2


line stmt bran cond sub pod time code
1             package Alzabo::Runtime::RowState::Deleted;
2              
3 11     11   64 use strict;
  11         30  
  11         386  
4              
5 11     11   62 use Alzabo::Runtime;
  11         23  
  11         379  
6              
7             BEGIN
8             {
9 11     11   59 no strict 'refs';
  11         30  
  11         1033  
10 11     11   36 foreach my $meth ( qw( select select_hash refresh update delete id_as_string ) )
11             {
12 66         1418 *{__PACKAGE__ . "::$meth"} =
13 66     0   288 sub { $_[1]->_no_such_row_error };
  0            
14             }
15             }
16              
17 0     0 0   sub is_potential { 0 }
18              
19 0     0 0   sub is_live { 0 }
20              
21 0     0 0   sub is_deleted { 1 }
22              
23              
24             1;
25              
26             __END__