From: Justin Hunter <justin.d.hunter@gmail.com>
Date: Tue, 11 Aug 2009 02:52:15 +0000 (-0700)
Subject: make PrimaryKey an Index and Constraint
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e2a243609893b31aa1d84858bddb5e041b1da08d;p=dbsrgits%2FSQL-Translator-2.0-ish.git

make PrimaryKey an Index and Constraint
---

diff --git a/lib/SQL/Translator/Object/PrimaryKey.pm b/lib/SQL/Translator/Object/PrimaryKey.pm
index 490786c..240d71a 100644
--- a/lib/SQL/Translator/Object/PrimaryKey.pm
+++ b/lib/SQL/Translator/Object/PrimaryKey.pm
@@ -1,8 +1,8 @@
 use MooseX::Declare;
 class SQL::Translator::Object::PrimaryKey {
-    extends 'SQL::Translator::Object::Index';
+    extends qw(SQL::Translator::Object::Index SQL::Translator::Object::Constraint);
 
     has '+type' => (
-        default => 'PRIMARY_KEY',
+        default => 'PRIMARY KEY',
     );
 }