fix var typo and add in missing correspondent index

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

diff --git a/Debbugs/DB/Result/BinVer.pm b/Debbugs/DB/Result/BinVer.pm
index 432cbb1b773ba01213ccaba0737042327b3e58b9..30be6c2411d7827822b700411ad4be0d4cd3dc64 100644 (file)
--- a/Debbugs/DB/Result/BinVer.pm
+++ b/Debbugs/DB/Result/BinVer.pm
@@ -6,7 +6,7 @@ package Debbugs::DB::Result::BinVer;
 
 =head1 NAME
 
-Debbugs::DB::Result::BinVer
+Debbugs::DB::Result::BinVer - Binary versions
 
 =cut
 
@@ -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<bin_ver>
 
@@ -35,71 +37,95 @@ __PACKAGE__->table("bin_ver");
 
 =head1 ACCESSORS
 
-=head2 bin_pkg_id
+=head2 id
+
+  data_type: 'integer'
+  is_auto_increment: 1
+  is_nullable: 0
+  sequence: 'bin_ver_id_seq'
+
+Binary version id
+
+=head2 bin_pkg
 
   data_type: 'integer'
   is_foreign_key: 1
   is_nullable: 0
 
-=head2 src_ver_id
+Binary package id (matches bin_pkg)
+
+=head2 src_ver
 
   data_type: 'integer'
   is_foreign_key: 1
   is_nullable: 0
 
-=head2 arch_id
+Source version (matchines src_ver)
+
+=head2 arch
 
   data_type: 'integer'
   is_foreign_key: 1
   is_nullable: 0
 
+Architecture id (matches arch)
+
 =head2 ver
 
-  data_type: 'text'
+  data_type: 'debversion'
   is_nullable: 0
 
+Binary version
+
 =cut
 
 __PACKAGE__->add_columns(
-  "bin_pkg_id",
+  "id",
+  {
+    data_type         => "integer",
+    is_auto_increment => 1,
+    is_nullable       => 0,
+    sequence          => "bin_ver_id_seq",
+  },
+  "bin_pkg",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 0 },
-  "src_ver_id",
+  "src_ver",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 0 },
-  "arch_id",
+  "arch",
   { data_type => "integer", is_foreign_key => 1, is_nullable => 0 },
   "ver",
-  { data_type => "text", is_nullable => 0 },
+  { data_type => "debversion", is_nullable => 0 },
 );
 
-=head1 UNIQUE CONSTRAINTS
-
-=head2 C<bin_ver_bin_pkg_id_arch_idx>
+=head1 PRIMARY KEY
 
 =over 4
 
-=item * L</bin_pkg_id>
-
-=item * L</arch_id>
+=item * L</id>
 
 =back
 
 =cut
 
-__PACKAGE__->add_unique_constraint("bin_ver_bin_pkg_id_arch_idx", ["bin_pkg_id", "arch_id"]);
+__PACKAGE__->set_primary_key("id");
 
-=head2 C<bin_ver_src_ver_id_arch_idx>
+=head1 UNIQUE CONSTRAINTS
+
+=head2 C<bin_ver_bin_pkg_id_arch_idx>
 
 =over 4
 
-=item * L</src_ver_id>
+=item * L</bin_pkg>
+
+=item * L</arch>
 
-=item * L</arch_id>
+=item * L</ver>
 
 =back
 
 =cut
 
-__PACKAGE__->add_unique_constraint("bin_ver_src_ver_id_arch_idx", ["src_ver_id", "arch_id"]);
+__PACKAGE__->add_unique_constraint("bin_ver_bin_pkg_id_arch_idx", ["bin_pkg", "arch", "ver"]);
 
 =head1 RELATIONS
 
@@ -114,8 +140,23 @@ Related object: L<Debbugs::DB::Result::Arch>
 __PACKAGE__->belongs_to(
   "arch",
   "Debbugs::DB::Result::Arch",
-  { id => "arch_id" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { id => "arch" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
+);
+
+=head2 bin_associations
+
+Type: has_many
+
+Related object: L<Debbugs::DB::Result::BinAssociation>
+
+=cut
+
+__PACKAGE__->has_many(
+  "bin_associations",
+  "Debbugs::DB::Result::BinAssociation",
+  { "foreign.bin" => "self.id" },
+  { cascade_copy => 0, cascade_delete => 0 },
 );
 
 =head2 bin_pkg
@@ -129,8 +170,8 @@ Related object: L<Debbugs::DB::Result::BinPkg>
 __PACKAGE__->belongs_to(
   "bin_pkg",
   "Debbugs::DB::Result::BinPkg",
-  { id => "bin_pkg_id" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { id => "bin_pkg" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
 );
 
 =head2 src_ver
@@ -144,14 +185,24 @@ Related object: L<Debbugs::DB::Result::SrcVer>
 __PACKAGE__->belongs_to(
   "src_ver",
   "Debbugs::DB::Result::SrcVer",
-  { id => "src_ver_id" },
-  { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" },
+  { id => "src_ver" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "CASCADE" },
 );
 
 
-# Created by DBIx::Class::Schema::Loader v0.07025 @ 2012-07-17 10:25:29
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:0AnavpmoUrdrgChtyIBRBg
+# Created by DBIx::Class::Schema::Loader v0.07045 @ 2016-11-24 09:08:27
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:DzTzZbPkilT8WMhXoZv9xw
+
 
+sub sqlt_deploy_hook {
+    my ($self, $sqlt_table) = @_;
+    for my $idx (qw(ver bin_pkg src_ver)) {
+       $sqlt_table->add_index(name => 'bin_ver_'.$idx.'_id_idx',
+                              fields => [$idx]);
+    }
+    $sqlt_table->add_index(name => 'bin_ver_src_ver_id_arch_idx',
+                          fields => [qw(src_ver arch)]
+                         );
+}
 
-# You can replace this text with custom code or comments, and it will be preserved on regeneration
 1;