Artikel-BDVs unter Basisdaten anzeigen, falls konfiguriert

[mfinanz.git] / SL / DB / MetaSetup / AuthClientUser.pm

diff --git a/SL/DB/MetaSetup/AuthClientUser.pm b/SL/DB/MetaSetup/AuthClientUser.pm
index b36577207f85b200717569e0bbe37aec7792ed6d..6f83105941d5e8a251e912eb38b31f5bdef0a706 100644 (file)
--- a/SL/DB/MetaSetup/AuthClientUser.pm
+++ b/SL/DB/MetaSetup/AuthClientUser.pm
@@ -4,29 +4,28 @@ package SL::DB::AuthClientUser;
 
 use strict;
 
 
 use strict;
 

-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);

 
 

-__PACKAGE__->meta->setup(
-  table   => 'clients_users',
+__PACKAGE__->meta->table('clients_users');
+__PACKAGE__->meta->schema('auth');

 
 

-  columns => [
-    client_id => { type => 'integer', not_null => 1 },
-    user_id   => { type => 'integer', not_null => 1 },
-  ],
+__PACKAGE__->meta->columns(
+  client_id => { type => 'integer', not_null => 1 },
+  user_id   => { type => 'integer', not_null => 1 },
+);

 
 

-  primary_key_columns => [ 'client_id', 'user_id' ],
+__PACKAGE__->meta->primary_key_columns([ 'client_id', 'user_id' ]);

 
 

-  foreign_keys => [
-    client => {
-      class       => 'SL::DB::AuthClient',
-      key_columns => { client_id => 'id' },
-    },
+__PACKAGE__->meta->foreign_keys(
+  client => {
+    class       => 'SL::DB::AuthClient',
+    key_columns => { client_id => 'id' },
+  },

 
 

-    user => {
-      class       => 'SL::DB::AuthUser',
-      key_columns => { user_id => 'id' },
-    },
-  ],
+  user => {
+    class       => 'SL::DB::AuthUser',
+    key_columns => { user_id => 'id' },
+  },

 );
 
 1;
 );
 
 1;