X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FSQL-Translator.git;a=blobdiff_plain;f=lib%2FTest%2FSQL%2FTranslator.pm;h=98563500b9264a90c708c43c674eb6946ba3a711;hp=58035367dfcfbb33a7aadc1e92298bd7ff1307b6;hb=c0ec0e22d3f0e3852c00daac5ef5763010b410c3;hpb=913fea5aff907287ac578782b0327599f2e91bc1

diff --git a/lib/Test/SQL/Translator.pm b/lib/Test/SQL/Translator.pm
index 5803536..9856350 100644
--- a/lib/Test/SQL/Translator.pm
+++ b/lib/Test/SQL/Translator.pm
@@ -284,6 +284,9 @@ sub trigger_ok {
     is( $obj->on_table, $test->{on_table},
         "$t_name    on_table is '$test->{on_table}'" );
 
+    is( $obj->scope, $test->{scope}, "$t_name    scope is '$test->{scope}'" )
+        if exists $test->{scope};
+
     is( $obj->action, $test->{action}, "$t_name    action is '$test->{action}'" );
 
     is_deeply( { $obj->extra }, $test->{extra}, "$t_name    extra" );