File Coverage

blib/lib/Class/ReluctantORM/Registry/None.pm
Criterion Covered Total %
statement 9 15 60.0
branch n/a
condition n/a
subroutine 3 9 33.3
pod 6 6 100.0
total 18 30 60.0


line stmt bran cond sub pod time code
1             package Class::ReluctantORM::Registry::None;
2 1     1   6 use strict;
  1         2  
  1         35  
3 1     1   4 use warnings;
  1         4  
  1         33  
4 1     1   7 use base 'Class::ReluctantORM::Registry';
  1         1  
  1         183  
5              
6             =head1 NAME
7              
8             Class::ReluctantORM::Registry::None - Do-Nothing Registry
9              
10             =head1 DESCRIPTION
11              
12             This registry does not store anything, and never remembers anything.
13             Use it to disable Registry effects.
14              
15             =head1 AUTHOR
16              
17             Clinton Wolfe clwolfe@cpan.org January 2010
18              
19             =cut
20              
21 0     0 1   sub fetch { return undef; }
22 0     0 1   sub store { } # do nothing
23 0     0 1   sub purge { } # do nothing
24 0     0 1   sub purge_all { } # do nothing
25 0     0 1   sub count { return 0; }
26 0     0 1   sub walk { } # do nothing
27              
28             1;