Mercurial > pub > Impl

comparison Lib/IMPL/SQL/Schema/Traits/mysql.pm @ 165:76515373dac0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:06:48 +0400
parents 16ada169ca75
children c8fe3f84feba
comparison
equal deleted inserted replaced
164:eb3e9861a761 165:76515373dac0
1 package IMPL::SQL::Schema::Traits::mysql::Handler; 1 package IMPL::SQL::Schema::Traits::mysql::Handler;
2 use strict; 2 use strict;
3 use base qw(IMPL::Object); 3 use parent qw(IMPL::Object);
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 BEGIN { 7 BEGIN {
8 public _direct property SqlBatch => prop_all; 8 public _direct property SqlBatch => prop_all;
467 } 467 }
468 } 468 }
469 469
470 package IMPL::SQL::Schema::Traits::mysql; 470 package IMPL::SQL::Schema::Traits::mysql;
471 use Common; 471 use Common;
472 use base qw(IMPL::SQL::Schema::Traits); 472 use parent qw(IMPL::SQL::Schema::Traits);
473 use IMPL::Class::Property; 473 use IMPL::Class::Property;
474 use IMPL::Class::Property::Direct; 474 use IMPL::Class::Property::Direct;
475 475
476 BEGIN { 476 BEGIN {
477 public _direct property PendingConstraints => prop_none; 477 public _direct property PendingConstraints => prop_none;
511 return IMPL::SQL::Schema::Traits::mysql::MetaTable->new( DBHandle => $dbh); 511 return IMPL::SQL::Schema::Traits::mysql::MetaTable->new( DBHandle => $dbh);
512 } 512 }
513 513
514 package IMPL::SQL::Schema::Traits::mysql::MetaTable; 514 package IMPL::SQL::Schema::Traits::mysql::MetaTable;
515 use Common; 515 use Common;
516 use base qw(IMPL::Object); 516 use parent qw(IMPL::Object);
517 use IMPL::Class::Property; 517 use IMPL::Class::Property;
518 use IMPL::Class::Property::Direct; 518 use IMPL::Class::Property::Direct;
519 519
520 BEGIN { 520 BEGIN {
521 public _direct property DBHandle => prop_none; 521 public _direct property DBHandle => prop_none;