Add author test for whitespace errors and make whitespace more consistent

[dbsrgits/DBIx-Class-Schema-Loader.git] / t / 27filter_generated.t

diff --git a/t/27filter_generated.t b/t/27filter_generated.t
index efa3811..db9a4d6 100644 (file)
--- a/t/27filter_generated.t
+++ b/t/27filter_generated.t
@@ -43,12 +43,12 @@ my ($schema_file_count, $result_file_count);
             }
 
             $original_class_data{$class} = $text;
-           if ($class =~ /::1$/) {
+            if ($class =~ /::1$/) {
                 $text = "No Gotcha!";
-           }
+            }
             else {
-               $text .= q{my $foo = "Kilroy was here";};
-           }
+                $text .= q{my $foo = "Kilroy was here";};
+            }
             return $text;
         },
     );
@@ -75,13 +75,13 @@ is $result_file_count, 4,
     'correct number of result files passed to filter';
 
 my $foo = slurp_file "$dump_path/DBICTest/Schema/1/Result/Foo.pm";
-ok(! -e "$dump_path/DBICTest/Schema/1.pm",
-     "No package means no file written");
-ok($original_class_data{"DBICTest::Schema::1"},
-     "Even though we processed the missing class");
-like($foo, qr/# Created by .* THE FIRST PART/s,
-     "We get the whole autogenerated text");
-like($foo, qr/Kilroy was here/, "Can insert text");
+ok ! -e "$dump_path/DBICTest/Schema/1.pm",
+    "No package means no file written";
+ok $original_class_data{"DBICTest::Schema::1"},
+    "Even though we processed the missing class";
+like $foo, qr/# Created by .* THE FIRST PART/s,
+    "We get the whole autogenerated text";
+like $foo, qr/Kilroy was here/, "Can insert text";
 
 DBICTest::Schema::2->connect($make_dbictest_db::dsn);