File Coverage

blib/lib/Bio/Chado/Schema.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 1 1 100.0
total 32 32 100.0


line stmt bran cond sub pod time code
1             package Bio::Chado::Schema;
2             BEGIN {
3 6     6   50935 $Bio::Chado::Schema::AUTHORITY = 'cpan:RBUELS';
4             }
5             BEGIN {
6 6     6   93 $Bio::Chado::Schema::VERSION = '0.08001'; # TRIAL
7             }
8              
9             # Created by DBIx::Class::Schema::Loader
10             # DO NOT MODIFY THE FIRST PART OF THIS FILE
11              
12 6     6   29 use strict;
  6         14  
  6         90  
13 6     6   22 use warnings;
  6         12  
  6         135  
14              
15 6     6   25 use base 'DBIx::Class::Schema';
  6         16  
  6         2746  
16              
17             __PACKAGE__->load_namespaces;
18              
19              
20             # Created by DBIx::Class::Schema::Loader v0.04999_12 @ 2010-01-01 13:09:35
21             # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:GfcGc0XJeU/0mXXXgJb7FQ
22              
23 6     6   276682 use Bio::Chado::Schema::Util;
  6         15  
  6         342  
24              
25              
26             {
27             my @after_load;
28             $_->() for @after_load; #< note that this executes after load_classes above
29              
30             sub plugin_add_relationship {
31 1     1 1 2408 my ( $class, $target_moniker, $reltype, @args ) = @_;
32              
33             push @after_load, sub {
34 6     6   37 no strict 'refs';
  6         11  
  6         394  
35 1     1   11 my $target_class = $class->class( $target_moniker );
36 1         91 $target_class->$reltype( @args );
37 1         565 __PACKAGE__->register_class( $target_moniker => $target_class );
38 1         10 };
39             }
40             }
41              
42              
43             1;
44              
45             __END__