File Coverage

blib/lib/Interchange6/Schema/Result/NavigationMessage.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1 2     2   1205 use utf8;
  2         7  
  2         13  
2              
3             package Interchange6::Schema::Result::NavigationMessage;
4              
5             =head1 NAME
6              
7             Interchange6::Schema::Result::NavigationMessage
8              
9             =cut
10              
11 2     2   98 use Interchange6::Schema::Candy;
  2         4  
  2         20  
12              
13             =head1 DESCRIPTION
14              
15             Link table between Navigation and Message for blogs, etc
16              
17             =cut
18              
19             =head1 ACCESSORS
20              
21             =head2 messages_id
22              
23             Foreign key constraint on L<Interchange6::Schema::Result::Message/messages_id>
24             via L</message> relationship.
25              
26             =cut
27              
28             column messages_id => {
29             data_type => "integer",
30             };
31              
32             =head2 navigation_id
33              
34             Foreign key constraint on
35             L<Interchange6::Schema::Result::Navigation/navigation_id>
36             via L</navigation> relationship.
37              
38             =cut
39              
40             column navigation_id => {
41             data_type => "integer",
42             };
43              
44             =head1 PRIMARY KEY
45              
46             =over 4
47              
48             =item * L</messages_id>
49              
50             =item * L</navigation_id>
51              
52             =back
53              
54             =cut
55              
56             primary_key "messages_id", "navigation_id";
57              
58             =head1 RELATIONS
59              
60             =head2 message
61              
62             Type: belongs_to
63              
64             Related object: L<Interchange6::Schema::Result::Message>
65              
66             =cut
67              
68             belongs_to
69             message => "Interchange6::Schema::Result::Message",
70             "messages_id",
71             { cascade_delete => 1 };
72              
73             =head2 navigation
74              
75             Type: belongs_to
76              
77             Related object: L<Interchange6::Schema::Result::Navigation>
78              
79             =cut
80              
81             belongs_to
82             navigation => "Interchange6::Schema::Result::Navigation",
83             "navigation_id";
84              
85             1;