Release commit for 1.62

[dbsrgits/SQL-Translator.git] / t / 38-filter-names.t

diff --git a/t/38-filter-names.t b/t/38-filter-names.t
index 670fd66..4edd793 100644 (file)
--- a/t/38-filter-names.t
+++ b/t/38-filter-names.t
@@ -33,14 +33,11 @@ schema:
   procedures: {}
   tables:
     person:
-      comments: ''
       constraints: []
       fields:
         First_name:
-          comments: ''
           data_type: foovar
           default_value: ~
-          extra: {}
           is_nullable: 1
           is_primary_key: 0
           is_unique: 0
@@ -77,7 +74,7 @@ $obj = SQL::Translator->new(
     data          => $in_yaml,
     filters => [
         # Filter from SQL::Translator::Filter::*
-        [ 'Names', { 
+        [ 'Names', {
             tables => 'lc',
             fields => 'ucfirst',
         } ],
@@ -89,7 +86,7 @@ my $out;
 lives_ok { $out = $obj->translate; }  "Translate ran";
 is $obj->error, ''                   ,"No errors";
 ok $out ne ""                        ,"Produced something!";
-# Somewhat hackishly modify the yaml with a regex to avoid 
+# Somewhat hackishly modify the yaml with a regex to avoid
 # failing randomly on every change of version.
 $out =~ s/version: .*/version: SUPPRESSED/;
 eq_or_diff $out, $ans_yaml           ,"Output looks right";