zap unused var
[dbsrgits/SQL-Translator.git] / lib / SQL / Translator / Producer / YAML.pm
index c5055ff..782ddb1 100644 (file)
@@ -21,7 +21,7 @@ takes a long time.
 
 use strict;
 use warnings;
-our $VERSION = '1.59';
+our $VERSION = '1.60';
 
 use YAML qw(Dump);
 
@@ -148,7 +148,9 @@ sub view_trigger {
         'fields'              => scalar $trigger->fields,
         'on_table'            => scalar $trigger->on_table,
         'action'              => scalar $trigger->action,
-        'scope'               => scalar $trigger->scope,
+        (defined $trigger->scope ? (
+            'scope'           => scalar $trigger->scope,
+        ) : ()),
         keys %{$trigger->extra} ? ('extra' => { $trigger->extra } ) : (),
     };
 }