lib/SQL/Translator/Object/PrimaryKey.pm

   1 use MooseX::Declare;
   2 class SQL::Translator::Object::PrimaryKey {
   3     extends qw(SQL::Translator::Object::Index SQL::Translator::Object::Constraint);
   4
   5     has '+type' => (
   6         default => 'PRIMARY KEY',
   7     );
   8 }