use Test::More;
use Test::SQL::Translator;
use Test::Exception;
+use Test::Differences;
use Data::Dumper;
use SQL::Translator;
use SQL::Translator::Schema::Constants;
"another_id" number(10) DEFAULT \'2\',
"timest" date,
PRIMARY KEY ("id"),
- CONSTRAINT "Basic_emailuniqueindex" UNIQUE ("email")
+ CONSTRAINT "u_Basic_emailuniqueindex" UNIQUE ("email"),
+ CONSTRAINT "u_Basic_very_long_index_name_o" UNIQUE ("title")
)',
'DROP TABLE "Another" CASCADE CONSTRAINTS',
'DROP SEQUENCE "sq_Another_id"',
is_deeply(\@sql, $want, 'Got correct Oracle statements in list context');
-is($sql_string, q|DROP TABLE "Basic" CASCADE CONSTRAINTS;
+eq_or_diff($sql_string, q|DROP TABLE "Basic" CASCADE CONSTRAINTS;
DROP SEQUENCE "sq_Basic_id01";
"another_id" number(10) DEFAULT '2',
"timest" date,
PRIMARY KEY ("id"),
- CONSTRAINT "Basic_emailuniqueindex" UNIQUE ("email")
+ CONSTRAINT "u_Basic_emailuniqueindex01" UNIQUE ("email"),
+ CONSTRAINT "u_Basic_very_long_index_name01" UNIQUE ("title")
);
DROP TABLE "Another" CASCADE CONSTRAINTS;