switch to compatibility level 12

[debbugs.git] / Debbugs / DB / Result / MessageCorrespondent.pm

diff --git a/Debbugs/DB/Result/MessageCorrespondent.pm b/Debbugs/DB/Result/MessageCorrespondent.pm
index 033f448fc53ecc393cd40c5ef55fed5f40bdae68..ddc79d11db3ae7e118c3e4814f460b7d3d863a45 100644 (file)
--- a/Debbugs/DB/Result/MessageCorrespondent.pm
+++ b/Debbugs/DB/Result/MessageCorrespondent.pm
@@ -21,11 +21,13 @@ use base 'DBIx::Class::Core';
 
 =item * L<DBIx::Class::InflateColumn::DateTime>
 
+=item * L<DBIx::Class::TimeStamp>
+
 =back
 
 =cut
 
-__PACKAGE__->load_components("InflateColumn::DateTime");
+__PACKAGE__->load_components("InflateColumn::DateTime", "TimeStamp");
 
 =head1 TABLE: C<message_correspondent>
 
@@ -55,7 +57,7 @@ Correspondent (matches correspondent)
 
   data_type: 'enum'
   default_value: 'to'
-  extra: {custom_type_name => "message_correspondent_type",list => ["to","from","envfrom","cc"]}
+  extra: {custom_type_name => "message_correspondent_type",list => ["to","from","envfrom","cc","recv"]}
   is_nullable: 0
 
 Type of correspondent (to, from, envfrom, cc, etc.)
@@ -73,7 +75,7 @@ __PACKAGE__->add_columns(
     default_value => "to",
     extra => {
       custom_type_name => "message_correspondent_type",
-      list => ["to", "from", "envfrom", "cc"],
+      list => ["to", "from", "envfrom", "cc", "recv"],
     },
     is_nullable => 0,
   },
@@ -114,7 +116,7 @@ __PACKAGE__->belongs_to(
   "correspondent",
   "Debbugs::DB::Result::Correspondent",
   { id => "correspondent" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
 );
 
 =head2 message
@@ -129,13 +131,20 @@ __PACKAGE__->belongs_to(
   "message",
   "Debbugs::DB::Result::Message",
   { id => "message" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
 );
 
 
-# Created by DBIx::Class::Schema::Loader v0.07025 @ 2013-01-22 21:35:43
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:wo2PGK4VpJ1hB8YBJ9QNUg
+# Created by DBIx::Class::Schema::Loader v0.07046 @ 2017-03-07 19:03:32
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:kIhya7skj4ZNM3DkC+gAPw
+
 
+sub sqlt_deploy_hook {
+    my ($self, $sqlt_table) = @_;
+    for my $idx (qw(correspondent message)) {
+       $sqlt_table->add_index(name => 'message_correspondent_idx'.$idx,
+                              fields => [$idx]);
+    }
+}
 
-# You can replace this text with custom code or comments, and it will be preserved on regeneration
 1;