Commits

Shlomi Fish committed b0dfd0a

Add t/cpan-changes.t and t/style-trailing-space.t

Comments (0)

Files changed (8)

File-Find-Object-Rule-VCS/Changes

 Revision history for File::Find::Object::Rule::VCS
 
-0.0.2   Thu Dec 31 12:24:59 IST 2009
+0.0.2   2009-12-31
     - Add Text::Glob to the dependencies.
 
-0.0.1   Fri Dec 11 17:31:38 IST 2009
+0.0.1   2009-12-11
     - Converted File-Find-Object-Rule-1.07 to this distribution.
-
-Revision history for Perl extension File::Find::Rule::VCS
-
-1.07 Wed  8 Jul 2009
-	- Added git support to resolve #43558: .git missing
-
-1.06 Wed  8 Jul 2009
-	- Updated to Module::Install::DSL 0.91
-	- Added explicit dependency on Text::Glob.
-	  Some CPAN Testers machines seem to blow up without it.
-
-1.05 Mon 29 Sep 2008
-	- Updated to Module::Install 0.77
-	- Updated tests to new style
-	- Adding support for _svn (closes bug #32030)
-
-1.04 Sat 10 May 2008
-	- Support ->ignore_vcs() for ignoring all supported VCS
-	- Change all methods to check file name before checking
-	  it is a directory or file.
-	  This should provide a *massive* reduction in the number
-	  of filesystem -f or -d calls that get made.
-
-1.03 Sat 22 Mar 2008
-	- Adding support for Bazaar
-
-1.02 Fri 22 Sep 2006
-        - Making ->ignore_vcs('') a nullop, as a convenience
-
-1.01 Mon  4 Sep 2006
-	- Upgrading to Module::Install 0.64
-
-1.00 Sat  8 Apr 2006
-	- Moved from old CVS to new SVN repository
-	- Upgraded to Module::Install 0.61
-
-0.02 Sat 12 Feb 2005
-	- Decided that ignore_ was better than discard_
-	- When filtering CVS, remove those post-merge dot-hash files
-
-0.01 Fri 11 Feb 2005
-	- Created the initial version of the module

File-Find-Object-Rule-VCS/Changes.FFR-VCS.txt

+Revision history for Perl extension File::Find::Rule::VCS
+
+1.07 Wed  8 Jul 2009
+	- Added git support to resolve #43558: .git missing
+
+1.06 Wed  8 Jul 2009
+	- Updated to Module::Install::DSL 0.91
+	- Added explicit dependency on Text::Glob.
+	  Some CPAN Testers machines seem to blow up without it.
+
+1.05 Mon 29 Sep 2008
+	- Updated to Module::Install 0.77
+	- Updated tests to new style
+	- Adding support for _svn (closes bug #32030)
+
+1.04 Sat 10 May 2008
+	- Support ->ignore_vcs() for ignoring all supported VCS
+	- Change all methods to check file name before checking
+	  it is a directory or file.
+	  This should provide a *massive* reduction in the number
+	  of filesystem -f or -d calls that get made.
+
+1.03 Sat 22 Mar 2008
+	- Adding support for Bazaar
+
+1.02 Fri 22 Sep 2006
+        - Making ->ignore_vcs('') a nullop, as a convenience
+
+1.01 Mon  4 Sep 2006
+	- Upgrading to Module::Install 0.64
+
+1.00 Sat  8 Apr 2006
+	- Moved from old CVS to new SVN repository
+	- Upgraded to Module::Install 0.61
+
+0.02 Sat 12 Feb 2005
+	- Decided that ignore_ was better than discard_
+	- When filtering CVS, remove those post-merge dot-hash files
+
+0.01 Fri 11 Feb 2005
+	- Created the initial version of the module

File-Find-Object-Rule-VCS/MANIFEST

 Build.PL
 Changes
+Changes.FFR-VCS.txt
+MANIFEST			This list of files
+MANIFEST.SKIP
+META.json
+META.yml
+Makefile.PL
+README
 inc/Test/Run/Builder.pm
 lib/File/Find/Object/Rule/VCS.pm
-Makefile.PL
-MANIFEST.SKIP
-MANIFEST			This list of files
-META.yml
-README
 t/01_compile.t
 t/02_main.t
+t/cpan-changes.t
 t/pod-coverage.t
 t/pod.t
-META.json
+t/style-trailing-space.t

File-Find-Object-Rule-VCS/META.yml

   - 'Shlomi Fish <shlomif@cpan.org>'
 build_requires: {}
 configure_requires:
-  Module::Build: 0.40
+  Module::Build: 0.36
 dynamic_config: 1
 generated_by: 'Module::Build version 0.4007, CPAN::Meta::Converter version 2.132830'
 keywords:

File-Find-Object-Rule-VCS/inc/Test/Run/Builder.pm

         Test::Run::CmdLine::Iface->new(
             {
                 'test_files' => [glob("t/*.t")],
-            }   
+            }
             # 'backend_params' => $self->_get_backend_params(),
         );
 
 
 sub ACTION_tags
 {
-    return 
+    return
         system(qw(
             ctags -f tags --recurse --totals
     		--exclude=blib/ --exclude=t/lib

File-Find-Object-Rule-VCS/lib/File/Find/Object/Rule/VCS.pm

 
 =head1 NAME
 
-File::Find::Object::Rule::VCS - Exclude files/directories for Version Control 
+File::Find::Object::Rule::VCS - Exclude files/directories for Version Control
 Systems
 
 =head1 SYNOPSIS
 
   use File::Find::Object::Rule      ();
   use File::Find::Object::Rule::VCS ();
-  
+
   # Find all files smaller than 10k, ignoring version control files
   my @files = File::Find::Object::Rule->ignore_vcs
                                       ->file
 
   # Ignore all common version control systems
   $find->ignore_vcs;
-  
+
   # Ignore a specific named version control systems
   $find->ignore_vcs($name);
-  
+
   # Ignore nothing (silent pass-through)
   $find->ignore_vcs('');
 
 
 =head1 AUTHOR
 
-=head2 ORIGINAL AUTHOR 
+=head2 ORIGINAL AUTHOR
 
 Adam Kennedy E<lt>adamk@cpan.orgE<gt>
 

File-Find-Object-Rule-VCS/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-Find-Object-Rule-VCS/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;
+}
+
+# TODO: add .pod, .PL, the README/Changes/TODO/etc. documents and possibly
+# some other stuff.
+my $finder = Test::TrailingSpace->new(
+   {
+       root => '.',
+       filename_regex => qr/(?:\.(?:t|pm|pl|xs|c|h|txt|pod|PL)|README|Changes|TODO|LICENSE)\z/,
+   },
+);
+
+# TEST
+$finder->no_trailing_space(
+   "No trailing space was found."
+);