X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FObject%2FConstraint.pm;h=4a76da88883d6deaf82affa1aa6d3fce4a89d012;hb=ee7a6e73d206dc390ec1b009960847989923ad6e;hp=505b2a86d4d933b18e0d624f7ae2a1118c35c525;hpb=a499b4bdb67f16a5a7f0934c52104895f7321f97;p=dbsrgits%2FSQL-Translator-2.0-ish.git diff --git a/lib/SQL/Translator/Object/Constraint.pm b/lib/SQL/Translator/Object/Constraint.pm index 505b2a8..4a76da8 100644 --- a/lib/SQL/Translator/Object/Constraint.pm +++ b/lib/SQL/Translator/Object/Constraint.pm @@ -88,7 +88,8 @@ class SQL::Translator::Object::Constraint extends SQL::Translator::Object { if ($self->has_type && $self->type eq 'PRIMARY KEY') { $column->is_primary_key(1); } - $self->$orig($column->name, $column) + $self->$orig($column->name, $column); + return $self->get_column($column->name); } multi method order(Int $order) { $self->_order($order); }