use strict;
-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);
-__PACKAGE__->meta->setup(
- table => 'schema_info',
+__PACKAGE__->meta->table('schema_info');
- columns => [
- tag => { type => 'text', not_null => 1 },
- login => { type => 'text' },
- itime => { type => 'timestamp', default => 'now()' },
- ],
+__PACKAGE__->meta->columns(
+ itime => { type => 'timestamp', default => 'now()' },
+ login => { type => 'text' },
+ tag => { type => 'text', not_null => 1 },
+);
- primary_key_columns => [ 'tag' ],
+__PACKAGE__->meta->primary_key_columns([ 'tag' ]);
- allow_inline_column_values => 1,
-);
+__PACKAGE__->meta->allow_inline_column_values(1);
1;
;