X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f9676efea9ccfa01df2a57dca9c45cc8fde0d09e..c364e43efab3ac6f0f0c20cd6f8f89a85ab45280:/SL/DB/MetaSetup/Printer.pm

diff --git a/SL/DB/MetaSetup/Printer.pm b/SL/DB/MetaSetup/Printer.pm
index fc2446a1b..0e961d431 100644
--- a/SL/DB/MetaSetup/Printer.pm
+++ b/SL/DB/MetaSetup/Printer.pm
@@ -4,20 +4,18 @@ package SL::DB::Printer;
 
 use strict;
 
-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);
 
-__PACKAGE__->meta->setup(
-  table   => 'printers',
+__PACKAGE__->meta->table('printers');
 
-  columns => [
-    id                  => { type => 'integer', not_null => 1, sequence => 'id' },
-    printer_description => { type => 'text', not_null => 1 },
-    printer_command     => { type => 'text' },
-    template_code       => { type => 'text' },
-  ],
-
-  primary_key_columns => [ 'id' ],
+__PACKAGE__->meta->columns(
+  id                  => { type => 'integer', not_null => 1, sequence => 'id' },
+  printer_command     => { type => 'text' },
+  printer_description => { type => 'text', not_null => 1 },
+  template_code       => { type => 'text' },
 );
 
+__PACKAGE__->meta->primary_key_columns([ 'id' ]);
+
 1;
 ;