X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F03mysql-to-oracle.t;h=5b64c598dfa689de9a92ef5894b987848941d41b;hb=90089d638fc1c611a3c23651edb096546c19f38f;hp=885ab7abea20f6406299450ec551561c2667d712;hpb=15861005302cd4158c36fadd162c5dac73d2176e;p=dbsrgits%2FSQL-Translator.git diff --git a/t/03mysql-to-oracle.t b/t/03mysql-to-oracle.t index 885ab7a..5b64c59 100644 --- a/t/03mysql-to-oracle.t +++ b/t/03mysql-to-oracle.t @@ -10,6 +10,7 @@ my $create = q| CREATE TABLE random ( id int auto_increment PRIMARY KEY, foo varchar(255) not null default '', + bar enum('wibble','wo''bble'), updated timestamp ); CREATE UNIQUE INDEX random_foo_update ON random(foo,updated); @@ -18,7 +19,7 @@ CREATE INDEX random_foo ON random(foo); |; BEGIN { - maybe_plan(3, + maybe_plan(undef, 'SQL::Translator::Parser::MySQL', 'SQL::Translator::Producer::Oracle'); } @@ -26,8 +27,8 @@ BEGIN { my $tr = SQL::Translator->new( parser => "MySQL", producer => "Oracle", - quote_table_names => 0, - quote_field_names => 0, + quote_table_names => 0, + quote_field_names => 0, ); my $output = $tr->translate(\$create); @@ -35,3 +36,6 @@ my $output = $tr->translate(\$create); ok( $output, 'Translate MySQL to Oracle' ); ok( $output =~ /CREATE INDEX random_foo /, 'Normal index definition translated.'); ok( $output =~ /CREATE UNIQUE INDEX random_foo_update /, 'Unique index definition translated.'); +ok( $output =~ /\QCHECK (bar IN ('wibble', 'wo''bble'))\E/, 'Enum translated and escaped.'); + +done_testing;