Commit | Line | Data |
4f4fd192 |
1 | use MooseX::Declare; |
2 | class SQL::Translator::Object::ForeignKey { |
70ada8ac |
3 | use MooseX::Types::Moose qw(ArrayRef Maybe Undef Str); |
4f4fd192 |
4 | extends 'SQL::Translator::Object::Constraint'; |
5 | |
6 | has '+type' => ( |
70ada8ac |
7 | default => 'FOREIGN KEY', |
4f4fd192 |
8 | ); |
9 | |
70ada8ac |
10 | has 'on_delete' => ( |
11 | isa => Maybe[Str], |
12 | is => 'rw', |
13 | ); |
14 | |
15 | has 'on_update' => ( |
16 | isa => Maybe[Str], |
17 | is => 'rw', |
18 | ); |
19 | |
20 | has 'reference_table' => ( |
21 | isa => Str, |
4f4fd192 |
22 | is => 'rw', |
4f4fd192 |
23 | ); |
24 | } |