Release commit for 1.62
[dbsrgits/SQL-Translator.git] / t / 17sqlfxml-producer.t
index cded24b..85042ce 100644 (file)
@@ -48,7 +48,7 @@ sub xml_equals
     my ($got, $expect, $msg) = (@_, "XML looks right");
     $got    =~ s/^ +//gm;
     $expect =~ s/^ +//gm;
-    eq_or_diff $got, $expect, $msg;
+    eq_or_diff $got, $expect, $msg, { context => 1 };
 }
 
 #
@@ -193,7 +193,7 @@ $ans = <<EOXML;
   </tables>
   <views></views>
   <triggers>
-    <trigger name="foo_trigger" database_events="insert" on_table="Basic" perform_action_when="after" order="1">
+    <trigger name="foo_trigger" database_events="insert" on_table="Basic" perform_action_when="after" order="1" scope="row">
       <action>update modified=timestamp();</action>
       <extra hello="world" />
     </trigger>
@@ -222,6 +222,7 @@ EOXML
         database_events     => [$database_event],
         table               => $table,
         action              => $action,
+        scope               => 'row',
         extra               => { hello => "world" },
     ) or die $s->error;