Remove copyright headers from individual scripts
[dbsrgits/SQL-Translator.git] / t / 36-filters.t
index 6cd0b60..cfda7ac 100644 (file)
@@ -13,11 +13,10 @@ $INC{'SQL/Translator/Filter/Ok.pm'} = 'lib/SQL/Translator/Filter/Ok.pm';
 
 #=============================================================================
 # SQL::Translator::Filter::HelloWorld - Test filter in a package
-package SQL::Translator::Filter::HelloWorld;
+package   # hide from cpan
+    SQL::Translator::Filter::HelloWorld;
 
 use strict;
-use vars qw/$VERSION/;
-$VERSION=0.1;
 
 sub filter {
     my ($schema,%args) = (shift,@_);
@@ -43,7 +42,10 @@ use Test::SQL::Translator qw(maybe_plan);
 use Data::Dumper;
 
 BEGIN {
-    maybe_plan(16, 'Template', 'Test::Differences')
+    maybe_plan(16, 'Template 2.20', 'Test::Differences',
+               'SQL::Translator::Parser::YAML',
+              'SQL::Translator::Producer::YAML')
+
 }
 use Test::Differences;
 use SQL::Translator;
@@ -65,7 +67,6 @@ schema:
   procedures: {}
   tables:
     GdayWorld:
-      comments: ''
       constraints: []
       fields: {}
       indices: []
@@ -73,7 +74,6 @@ schema:
       options: []
       order: 3
     HelloWorld:
-      comments: ''
       constraints: []
       fields: {}
       indices: []
@@ -81,13 +81,11 @@ schema:
       options: []
       order: 2
     PERSON:
-      comments: ''
       constraints: []
       fields:
         first_name:
           data_type: foovar
           default_value: ~
-          extra: {}
           is_nullable: 1
           is_primary_key: 0
           is_unique: 0