Mercurial > pub > Impl
comparison Lib/Schema/DB/Constraint/PrimaryKey.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 | 16ada169ca75 |
children |
comparison
equal
deleted
inserted
replaced
165:76515373dac0 | 166:4267a2ac3d46 |
---|---|
1 package Schema::DB::Constraint::PrimaryKey; | 1 package Schema::DB::Constraint::PrimaryKey; |
2 use strict; | 2 use strict; |
3 use Common; | 3 use Common; |
4 use base qw(Schema::DB::Constraint::Index); | 4 use parent qw(Schema::DB::Constraint::Index); |
5 | 5 |
6 BEGIN { | 6 BEGIN { |
7 DeclareProperty ConnectedFK => ACCESS_READ; | 7 DeclareProperty ConnectedFK => ACCESS_READ; |
8 } | 8 } |
9 | 9 |