Adjust xml-db2 tests

diff --git a/t/43xml-to-db2.t b/t/43xml-to-db2.t
index dbedbdb..b7771b1 100644 (file)
--- a/t/43xml-to-db2.t
+++ b/t/43xml-to-db2.t
@@ -64,4 +64,6 @@ CREATE VIEW email_list AS
 SELECT email FROM Basic WHERE email IS NOT NULL;
 
 CREATE TRIGGER foo_trigger after insert ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified=timestamp();
+
+CREATE TRIGGER bar_trigger before insert, update ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified2=timestamp();
 SQL

diff --git a/t/44-xml-to-db2-array.t b/t/44-xml-to-db2-array.t
index fa73159..065fc35 100644 (file)
--- a/t/44-xml-to-db2-array.t
+++ b/t/44-xml-to-db2-array.t
@@ -61,7 +61,9 @@ q|CREATE TABLE Another (
 'CREATE VIEW email_list AS
 SELECT email FROM Basic WHERE email IS NOT NULL;',
 
-'CREATE TRIGGER foo_trigger after insert ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified=timestamp();'
+'CREATE TRIGGER foo_trigger after insert ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified=timestamp();',
+
+'CREATE TRIGGER bar_trigger before insert, update ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified2=timestamp();',
 ];
 
 is_deeply(\@sql, $want, 'Got correct DB2 statements in list context');