comparison Lib/IMPL/SQL/Schema/TraitsOld.pm @ 166:4267a2ac3d46

Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents 6ce1f052b90a
children d1676be8afcc
comparison
equal deleted inserted replaced
165:76515373dac0 166:4267a2ac3d46
1 package IMPL::SQL::Schema::Traits; 1 package IMPL::SQL::Schema::Traits;
2 use strict; 2 use strict;
3 use base qw(IMPL::Object IMPL::Object::Autofill); 3 use parent qw(IMPL::Object IMPL::Object::Autofill);
4 use IMPL::Class::Property; 4 use IMPL::Class::Property;
5 use IMPL::Class::Property::Direct; 5 use IMPL::Class::Property::Direct;
6 6
7 use constant { 7 use constant {
8 STATE_NORMAL => 0, 8 STATE_NORMAL => 0,