X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F51-xml-to-oracle_quoted.t;h=6f3a10217bdad9350c8e5fa04ac1f94babd80145;hb=HEAD;hp=be7f7b4cc7b04fda6a9fff29a75373d1378c46b0;hpb=3b9249fb0058ac9896a10c9ca8b87ddd40f6c074;p=dbsrgits%2FSQL-Translator.git diff --git a/t/51-xml-to-oracle_quoted.t b/t/51-xml-to-oracle_quoted.t index be7f7b4..6f3a102 100644 --- a/t/51-xml-to-oracle_quoted.t +++ b/t/51-xml-to-oracle_quoted.t @@ -40,7 +40,7 @@ my $sql_string = $sqlt->translate( filename => $xmlfile, ) or die $sqlt->error; -my $want = [ +my $want = [ 'DROP TABLE "Basic" CASCADE CONSTRAINTS', 'DROP SEQUENCE "sq_Basic_id"', 'CREATE SEQUENCE "sq_Basic_id"', @@ -84,7 +84,7 @@ END; 'CREATE OR REPLACE TRIGGER "ts_Basic_timest" BEFORE INSERT OR UPDATE ON "Basic" FOR EACH ROW WHEN (new."timest" IS NULL) -BEGIN +BEGIN SELECT sysdate INTO :new."timest" FROM dual; END; ', @@ -160,7 +160,7 @@ END; CREATE OR REPLACE TRIGGER "ts_Basic_timest01" BEFORE INSERT OR UPDATE ON "Basic" FOR EACH ROW WHEN (new."timest" IS NULL) -BEGIN +BEGIN SELECT sysdate INTO :new."timest" FROM dual; END; /