Commits

Shlomi Fish committed 8b79ff9

cpan-changes and style-trailing-space

  • Participants
  • Parent commits 724541e

Comments (0)

Files changed (8)

File modules/Test-Run-Plugin-BreakOnFailure/Changes

 Revision history for Test::Run::Plugin::AlternateInterpreters
 
-0.0.2   Sat 17 Nov 11:37:48 IST 2012
+0.0.3   2014-01-31
+        - Add t/cpan-changes.t and t/style-trailing-space.t .
+
+0.0.2   2012-11-17
         - Add Dist/tag-release.pl to tag a release.
         - Fix the tests on some versions (due to a stray "END:" label):
             - http://www.cpantesters.org/cpan/report/1b2066a2-243b-11e2-b162-b0ec0f99f9b5
 
-0.0.1   Fri Mar 16 09:43:38 IST 2007
+0.0.1   2007-03-16
         First version, released on an unsuspecting world.

File modules/Test-Run-Plugin-BreakOnFailure/MANIFEST

 Build.PL
 Changes
 Dist/tag-release.pl
+MANIFEST
+META.json
+META.yml # Will be created by "make dist"
+Makefile.PL
+README
 inc/Test/Run/Builder.pm
 lib/Test/Run/CmdLine/Plugin/BreakOnFailure.pm
 lib/Test/Run/Plugin/BreakOnFailure.pm
-Makefile.PL
-MANIFEST
-META.yml # Will be created by "make dist"
-README
 t/00-load.t
 t/01-run.t
 t/02-cmdline-run.t
 t/boilerplate.t
+t/cpan-changes.t
 t/data/config-files/placeholder
 t/data/interpreters/cat.pl
 t/data/interpreters/mini-ok.pl
 t/sample-tests/success1.cat
 t/sample-tests/success1.mok
 t/sample-tests/success2.mok.cat
-META.json
+t/style-trailing-space.t

File modules/Test-Run-Plugin-BreakOnFailure/inc/Test/Run/Builder.pm

         Test::Run::CmdLine::Iface->new(
             {
                 'test_files' => [glob("t/*.t")],
-            }   
+            }
             # 'backend_params' => $self->_get_backend_params(),
         );
 

File modules/Test-Run-Plugin-BreakOnFailure/t/01-run.t

             class => "MyTestRun",
             args =>
             [
-                test_files => 
+                test_files =>
                 [
                     "t/sample-tests/one-fail.t",
                     "t/sample-tests/one-ok.t",
         );
 
     # TEST
-    $got->field_unlike("stdout", qr/one-ok/, 
+    $got->field_unlike("stdout", qr/one-ok/,
         "Successful tests were skipped upon failure."
     );
 }
             class => "MyTestRun",
             args =>
             [
-                test_files => 
+                test_files =>
                 [
                     "t/sample-tests/one-fail.t",
                     "t/sample-tests/one-ok.t",
         );
 
     # TEST
-    $got->field_like("stdout", qr/one-ok/, 
+    $got->field_like("stdout", qr/one-ok/,
         "Failing test did not break the run of the rest upon no should_break_on_failure."
     );
 }

File modules/Test-Run-Plugin-BreakOnFailure/t/cpan-changes.t

+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+
+eval 'use Test::CPAN::Changes';
+plan skip_all => 'Test::CPAN::Changes required for this test' if $@;
+
+changes_ok();
+

File modules/Test-Run-Plugin-BreakOnFailure/t/data/interpreters/cat.pl

-#!/usr/bin/perl 
+#!/usr/bin/perl
 
 use strict;
 use warnings;

File modules/Test-Run-Plugin-BreakOnFailure/t/data/interpreters/mini-ok.pl

-#!/usr/bin/perl 
+#!/usr/bin/perl
 
 use strict;
 use warnings;
         if ($1+$2 == $3)
         {
             print "ok $num\n";
-            
+
         }
         else
         {

File modules/Test-Run-Plugin-BreakOnFailure/t/style-trailing-space.t

+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+
+eval "use Test::TrailingSpace";
+if ($@)
+{
+    plan skip_all => "Test::TrailingSpace required for trailing space test.";
+}
+else
+{
+    plan tests => 1;
+}
+
+my $finder = Test::TrailingSpace->new(
+    {
+        root => '.',
+        filename_regex => qr/(?:(?:\.(?:t|pm|pl|PL|yml|json|arc|vim))|README|Changes|LICENSE)\z/,
+    },
+);
+
+# TEST
+$finder->no_trailing_space(
+    "No trailing space was found."
+);
+