X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F47postgres-producer.t;fp=t%2F47postgres-producer.t;h=10b2bc587f46cae96ab6a1098a4daae0cc27b481;hb=aacb31871ec4c0eaf0c4c89287c4ac395063625f;hp=547ddf29600d0d7acab64997b548616209f59922;hpb=3f5ee660887abd03c5307808eff5ef6daafe6372;p=dbsrgits%2FSQL-Translator.git diff --git a/t/47postgres-producer.t b/t/47postgres-producer.t index 547ddf2..10b2bc5 100644 --- a/t/47postgres-producer.t +++ b/t/47postgres-producer.t @@ -14,7 +14,7 @@ use FindBin qw/$Bin/; #============================================================================= BEGIN { - maybe_plan(38, + maybe_plan(39, 'SQL::Translator::Producer::PostgreSQL', 'Test::Differences', ) @@ -40,6 +40,20 @@ my $field1_sql = SQL::Translator::Producer::PostgreSQL::create_field($field1); is($field1_sql, 'myfield character varying(10)', 'Create field works'); +my $field_array = SQL::Translator::Schema::Field->new( name => 'myfield', + table => $table, + data_type => 'character varying[]', + size => 10, + default_value => undef, + is_auto_increment => 0, + is_nullable => 1, + is_foreign_key => 0, + is_unique => 0 ); + +my $field_array_sql = SQL::Translator::Producer::PostgreSQL::create_field($field_array); + +is($field_array_sql, 'myfield character varying(10)[]', 'Create field works'); + my $field2 = SQL::Translator::Schema::Field->new( name => 'myfield', table => $table, data_type => 'VARCHAR',