X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F30sqlt-diff.t;h=957f89faa4684cf7933d0d0ac96e85826b97d307;hb=aee4b66eb2152b7066ced4def46e0223eb1649b1;hp=90abd7d22e5c6cde97c55d5a21f62b24919723e8;hpb=bdf60588bb1e35e284bdc02c43d0ffe691994465;p=dbsrgits%2FSQL-Translator.git diff --git a/t/30sqlt-diff.t b/t/30sqlt-diff.t index 90abd7d..957f89f 100644 --- a/t/30sqlt-diff.t +++ b/t/30sqlt-diff.t @@ -24,15 +24,15 @@ BEGIN { ); } -ok(-e $sqlt_diff, 'Found sqlt-diff script'); +ok(-e $sqlt_diff, 'Found sqlt-diff script'); my @cmd = ($^X, $sqlt_diff, "$create1=SQLite", "$create2=SQLite"); my $out = `@cmd`; like($out, qr/-- Target database SQLite is untested/, "Detected 'untested' comment"); like($out, qr/ALTER TABLE person CHANGE iq/, "Detected altered 'iq' field"); -like($out, qr/ALTER TABLE person ADD is_rock_star/, +like($out, qr/ALTER TABLE person ADD is_rock_star/, "Detected missing rock star field"); - + @cmd = ($^X, $sqlt_diff, "$create1=SQLite", "$create1=SQLite"); $out = `@cmd`; @@ -58,17 +58,17 @@ like($out, qr/ALTER TABLE person CHANGE person_id/, "Detected altered 'person_id like($out, qr/ALTER TABLE person CHANGE iq/, "Detected altered 'iq' field"); like($out, qr/ALTER TABLE person CHANGE name/, "Detected altered 'name' field"); like($out, qr/ALTER TABLE person CHANGE age/, "Detected altered 'age' field"); -like($out, qr/ALTER TABLE person ADD is_rock_star/, +like($out, qr/ALTER TABLE person ADD is_rock_star/, "Detected missing rock star field"); -like($out, qr/ALTER TABLE person ADD UNIQUE UC_person_id/, +like($out, qr/ALTER TABLE person ADD UNIQUE UC_person_id/, "Detected missing unique constraint"); -like($out, qr/CREATE UNIQUE INDEX unique_name/, +like($out, qr/CREATE UNIQUE INDEX unique_name/, "Detected unique index with different name"); -like($out, qr/ALTER TABLE person ENGINE=InnoDB;/, +like($out, qr/ALTER TABLE person ENGINE=InnoDB;/, "Detected altered table option"); -like($out, qr/ALTER TABLE employee DROP FOREIGN KEY FK5302D47D93FE702E/, +like($out, qr/ALTER TABLE employee DROP FOREIGN KEY FK5302D47D93FE702E/, "Detected drop foreign key"); -like($out, qr/ALTER TABLE employee ADD CONSTRAINT FK5302D47D93FE702E_diff/, +like($out, qr/ALTER TABLE employee ADD CONSTRAINT FK5302D47D93FE702E_diff/, "Detected add constraint"); unlike($out, qr/ALTER TABLE employee ADD PRIMARY KEY/, "Primary key looks different when it shouldn't"); @@ -93,7 +93,7 @@ my $oracle_create2 = (-d "t") $out = `@cmd`; unlike($out, qr/-- Target database Oracle is untested/, "Did not detect 'untested' comment"); -like($out, qr/ALTER TABLE TABLE1 DROP FOREIGN KEY/, +like($out, qr/ALTER TABLE TABLE1 DROP FOREIGN KEY/, "Detected drop foreign key"); -like($out, qr/ALTER TABLE TABLE1 ADD CONSTRAINT/, +like($out, qr/ALTER TABLE TABLE1 ADD CONSTRAINT/, "Detected add constraint");