add messageid to bug status

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

diff --git a/Debbugs/DB/Result/BugVer.pm b/Debbugs/DB/Result/BugVer.pm
index d35f3e6fd4cec80e3ce78fdb7cb948313a7918b6..472a1dffc31eb73a902605a802696e866a873ae9 100644 (file)
--- a/Debbugs/DB/Result/BugVer.pm
+++ b/Debbugs/DB/Result/BugVer.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<bug_ver>
 
@@ -35,6 +37,15 @@ __PACKAGE__->table("bug_ver");
 
 =head1 ACCESSORS
 
+=head2 id
+
+  data_type: 'integer'
+  is_auto_increment: 1
+  is_nullable: 0
+  sequence: 'bug_ver_id_seq'
+
+Bug version id
+
 =head2 bug
 
   data_type: 'integer'
@@ -58,7 +69,7 @@ Version string
 
 Source package id (matches src_pkg table)
 
-=head2 src_ver_id
+=head2 src_ver
 
   data_type: 'integer'
   is_foreign_key: 1
@@ -95,13 +106,20 @@ Time that this entry was modified
 =cut
 
 __PACKAGE__->add_columns(
+  "id",
+  {
+    data_type         => "integer",
+    is_auto_increment => 1,
+    is_nullable       => 0,
+    sequence          => "bug_ver_id_seq",
+  },
   "bug",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 0 },
   "ver_string",
   { data_type => "text", is_nullable => 1 },
   "src_pkg",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 1 },
-  "src_ver_id",
+  "src_ver",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 1 },
   "found",
   { data_type => "boolean", default_value => \"true", is_nullable => 0 },
@@ -121,6 +139,18 @@ __PACKAGE__->add_columns(
   },
 );
 
+=head1 PRIMARY KEY
+
+=over 4
+
+=item * L</id>
+
+=back
+
+=cut
+
+__PACKAGE__->set_primary_key("id");
+
 =head1 UNIQUE CONSTRAINTS
 
 =head2 C<bug_ver_bug_ver_string_found_idx>
@@ -156,7 +186,7 @@ __PACKAGE__->belongs_to(
   "bug",
   "Debbugs::DB::Result::Bug",
   { id => "bug" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { is_deferrable => 0, on_delete => "RESTRICT", on_update => "CASCADE" },
 );
 
 =head2 src_pkg
@@ -172,9 +202,9 @@ __PACKAGE__->belongs_to(
   "Debbugs::DB::Result::SrcPkg",
   { id => "src_pkg" },
   {
-    is_deferrable => 1,
+    is_deferrable => 0,
     join_type     => "LEFT",
-    on_delete     => "CASCADE",
+    on_delete     => "SET NULL",
     on_update     => "CASCADE",
   },
 );
@@ -190,19 +220,28 @@ Related object: L<Debbugs::DB::Result::SrcVer>
 __PACKAGE__->belongs_to(
   "src_ver",
   "Debbugs::DB::Result::SrcVer",
-  { id => "src_ver_id" },
+  { id => "src_ver" },
   {
-    is_deferrable => 1,
+    is_deferrable => 0,
     join_type     => "LEFT",
-    on_delete     => "CASCADE",
+    on_delete     => "SET NULL",
     on_update     => "CASCADE",
   },
 );
 
 
-# Created by DBIx::Class::Schema::Loader v0.07025 @ 2013-03-27 18:54:20
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:/WX1pwdsAUjQK28CwCaDQw
+# Created by DBIx::Class::Schema::Loader v0.07042 @ 2014-11-30 21:56:51
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:cvdjFL2o+rBg2PfcintuNA
 
 
-# You can replace this text with custom code or comments, and it will be preserved on regeneration
+sub sqlt_deploy_hook {
+    my ($self, $sqlt_table) = @_;
+    for my $idx (qw(src_pkg src_ver)) {
+       $sqlt_table->add_index(name => 'bug_ver_'.$idx.'_id_idx',
+                              fields => [$idx]);
+    }
+    $sqlt_table->add_index(name => 'bug_ver_src_pkg_id_src_ver_id_idx',
+                          fields => [qw(src_pkg src_ver)],
+                         );
+}
 1;