From: Justin Hunter Date: Mon, 27 Jun 2011 04:09:59 +0000 (-0400) Subject: ok, so I do need to pass in a HashRef X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e1f953521dafedd052a755e49ce32c0bb96f6c1d;p=dbsrgits%2FSQL-Translator-2.0-ish.git ok, so I do need to pass in a HashRef --- diff --git a/lib/SQL/Translator/Object/Table.pm b/lib/SQL/Translator/Object/Table.pm index 3ba3d60..7506978 100644 --- a/lib/SQL/Translator/Object/Table.pm +++ b/lib/SQL/Translator/Object/Table.pm @@ -168,7 +168,7 @@ class SQL::Translator::Object::Table extends SQL::Translator::Object is dirty { $primary_key = SQL::Translator::Object::Constraint->new( type => 'PRIMARY KEY' ); $self->add_constraint($primary_key); } - $primary_key->add_column( name => $column ) unless $primary_key->exists_column($column); + $primary_key->add_column({ name => $column }) unless $primary_key->exists_column($column); return $primary_key; }