X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FMetaSetup%2FRecordLink.pm;h=cf2c696be138eda4c0c2fbdea5ac39b03b9251cb;hb=b269674b6b0e99818c3643d4fc3271a8ce83b8c6;hp=4059be814e91a5e6e866f7116e9a38e01eb0fdd1;hpb=6cf3f7762efd40bee49a2b8f11bb4ab6915d9071;p=kivitendo-erp.git

diff --git a/SL/DB/MetaSetup/RecordLink.pm b/SL/DB/MetaSetup/RecordLink.pm
index 4059be814..cf2c696be 100644
--- a/SL/DB/MetaSetup/RecordLink.pm
+++ b/SL/DB/MetaSetup/RecordLink.pm
@@ -4,24 +4,22 @@ package SL::DB::RecordLink;
 
 use strict;
 
-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);
 
-__PACKAGE__->meta->setup(
-  table   => 'record_links',
+__PACKAGE__->meta->table('record_links');
 
-  columns => [
-    from_table => { type => 'varchar', length => 50, not_null => 1 },
-    from_id    => { type => 'integer', not_null => 1 },
-    to_table   => { type => 'varchar', length => 50, not_null => 1 },
-    to_id      => { type => 'integer', not_null => 1 },
-    itime      => { type => 'timestamp', default => 'now()' },
-    id         => { type => 'serial', not_null => 1 },
-  ],
+__PACKAGE__->meta->columns(
+  from_id    => { type => 'integer', not_null => 1 },
+  from_table => { type => 'varchar', length => 50, not_null => 1 },
+  id         => { type => 'serial', not_null => 1 },
+  itime      => { type => 'timestamp', default => 'now()' },
+  to_id      => { type => 'integer', not_null => 1 },
+  to_table   => { type => 'varchar', length => 50, not_null => 1 },
+);
 
-  primary_key_columns => [ 'id' ],
+__PACKAGE__->meta->primary_key_columns([ 'id' ]);
 
-  allow_inline_column_values => 1,
-);
+__PACKAGE__->meta->allow_inline_column_values(1);
 
 1;
 ;