r41354 - in /branches/upstream/libfile-next-perl/current: Changes META.yml Makefile.PL Next.pm README perlcriticrc t/api.t t/basic.t t/dirs.t t/dot.t t/everything.t t/follow.t t/sort.t t/zero.t

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Wed Aug 5 05:01:44 UTC 2009


Author: jawnsy-guest
Date: Wed Aug  5 05:01:36 2009
New Revision: 41354

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=41354
Log:
[svn-upgrade] Integrating new upstream version, libfile-next-perl (1.06)

Modified:
    branches/upstream/libfile-next-perl/current/Changes
    branches/upstream/libfile-next-perl/current/META.yml
    branches/upstream/libfile-next-perl/current/Makefile.PL
    branches/upstream/libfile-next-perl/current/Next.pm
    branches/upstream/libfile-next-perl/current/README
    branches/upstream/libfile-next-perl/current/perlcriticrc
    branches/upstream/libfile-next-perl/current/t/api.t
    branches/upstream/libfile-next-perl/current/t/basic.t
    branches/upstream/libfile-next-perl/current/t/dirs.t
    branches/upstream/libfile-next-perl/current/t/dot.t
    branches/upstream/libfile-next-perl/current/t/everything.t
    branches/upstream/libfile-next-perl/current/t/follow.t
    branches/upstream/libfile-next-perl/current/t/sort.t
    branches/upstream/libfile-next-perl/current/t/zero.t

Modified: branches/upstream/libfile-next-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/Changes?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/Changes (original)
+++ branches/upstream/libfile-next-perl/current/Changes Wed Aug  5 05:01:36 2009
@@ -2,6 +2,14 @@
 
 File::Next does NOT use rt.cpan.org for bug tracking.  Please report
 problems at http://github.com/petdance/file-next/issues.
+
+1.06    Tue Aug  4 15:10:34 CDT 2009
+    [FIXES]
+    Fixed closing =cut in POD.
+
+    There are no functionality changes, but the lack of a closing
+    =cut meant that ack would not build properly.
+
 
 1.04    Fri Jul 31 16:24:36 CDT 2009
     [ENHANCEMENTS]

Modified: branches/upstream/libfile-next-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/META.yml?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/META.yml (original)
+++ branches/upstream/libfile-next-perl/current/META.yml Wed Aug  5 05:01:36 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               File-Next
-version:            1.04
+version:            1.06
 abstract:           File-finding iterator
 author:
     - Andy Lester <andy at petdance.com>

Modified: branches/upstream/libfile-next-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/Makefile.PL?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/Makefile.PL (original)
+++ branches/upstream/libfile-next-perl/current/Makefile.PL Wed Aug  5 05:01:36 2009
@@ -54,11 +54,11 @@
 TARGET_DIRS=~/parrot /usr/local/minicpan ~/bin
 
 prof: all
-	perl -d:DProf -Mblib ./stress  $(TARGET_DIRS)
+	perl -d:DProf -Mblib ./stress $(TARGET_DIRS) > /dev/null
 	dprofpp -R
 
 nytprof: all
-	perl -d:NYTProf -Mblib ./stress $(TARGET_DIRS)
+	perl -d:NYTProf -Mblib ./stress $(TARGET_DIRS) > /dev/null
 	nytprofhtml
 
 MAKE_FRAG

Modified: branches/upstream/libfile-next-perl/current/Next.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/Next.pm?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/Next.pm (original)
+++ branches/upstream/libfile-next-perl/current/Next.pm Wed Aug  5 05:01:36 2009
@@ -9,11 +9,11 @@
 
 =head1 VERSION
 
-Version 1.04
+Version 1.06
 
 =cut
 
-our $VERSION = '1.04';
+our $VERSION = '1.06';
 
 =head1 SYNOPSIS
 
@@ -294,8 +294,8 @@
     }; # iterator
 }
 
-sub sort_standard($$)   { return $_[0]->[1] cmp $_[1]->[1] }; ## no critic (ProhibitSubroutinePrototypes)
-sub sort_reverse($$)    { return $_[1]->[1] cmp $_[0]->[1] }; ## no critic (ProhibitSubroutinePrototypes)
+sub sort_standard($$)   { return $_[0]->[1] cmp $_[1]->[1] } ## no critic (ProhibitSubroutinePrototypes)
+sub sort_reverse($$)    { return $_[1]->[1] cmp $_[0]->[1] } ## no critic (ProhibitSubroutinePrototypes)
 
 sub reslash {
     my $path = shift;
@@ -496,5 +496,6 @@
 
 =back
 
+=cut
 
 1; # End of File::Next

Modified: branches/upstream/libfile-next-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/README?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/README (original)
+++ branches/upstream/libfile-next-perl/current/README Wed Aug  5 05:01:36 2009
@@ -28,8 +28,8 @@
     Search CPAN
         http://search.cpan.org/dist/File-Next
 
-    CPAN Request Tracker:
-        http://rt.cpan.org/NoAuth/Bugs.html?Dist=File-Next
+    Bug Tracker:
+        http://github.com/petdance/file-next/issues
 
     AnnoCPAN, annotated CPAN documentation:
         http://annocpan.org/dist/File-Next
@@ -37,9 +37,15 @@
     CPAN Ratings:
         http://cpanratings.perl.org/d/File-Next
 
-COPYRIGHT AND LICENCE
+COPYRIGHT AND LICENSE
 
-Copyright (C) 2006 Andy Lester
+Copyright (C) 2006-2009 Andy Lester
 
-This program is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
+This program is free software; you can redistribute it and/or modify
+it under the terms of either:
+
+    * the GNU General Public License as published by the Free
+    Software Foundation; either version 1, or (at your option) any
+    later version, or
+
+    * the Artistic License version 2.0.

Modified: branches/upstream/libfile-next-perl/current/perlcriticrc
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/perlcriticrc?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/perlcriticrc (original)
+++ branches/upstream/libfile-next-perl/current/perlcriticrc Wed Aug  5 05:01:36 2009
@@ -1,6 +1,7 @@
 [-CodeLayout::ProhibitParensWithBuiltins]
 [CodeLayout::ProhibitHardTabs]
 allow_leading_tabs = 0
+[-CodeLayout::RequireTidyCode]
 
 [-ControlStructures::ProhibitPostfixControls]
 
@@ -11,10 +12,14 @@
 
 [-Modules::RequireVersionVar]
 
+[-RegularExpressions::RequireDotMatchAnything]
 [-RegularExpressions::RequireExtendedFormatting]
 [-RegularExpressions::RequireLineBoundaryMatching]
 
 [-ValuesAndExpressions::ProhibitConstantPragma]
 [-ValuesAndExpressions::ProhibitEmptyQuotes]
+[-ValuesAndExpressions::ProhibitNoisyQuotes]
 
 [-Variables::ProhibitPunctuationVars]
+[-Variables::ProhibitPackageVars]
+# The API for File::Next is all package vars

Modified: branches/upstream/libfile-next-perl/current/t/api.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/api.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/api.t (original)
+++ branches/upstream/libfile-next-perl/current/t/api.t Wed Aug  5 05:01:36 2009
@@ -10,7 +10,6 @@
 
 CHECK_FILE_FILTER: {
     my $file_filter = sub {
-        return if $File::Next::dir =~ /\.svn/;
         ok( defined $_, '$_ defined' );
         is( $File::Next::dir, File::Next::reslash( 't/swamp' ), '$File::Next::dir correct in $file_filter' );
         is( $File::Next::name, File::Next::reslash( "t/swamp/$_" ), '$File::Next::name is correct' );
@@ -37,7 +36,6 @@
 CHECK_DESCEND_FILTER: {
     my $swamp = File::Next::reslash( 't/swamp' );
     my $descend_filter = sub {
-        return if $File::Next::dir =~ /\.svn/;
         ok( defined $_, '$_ defined' );
         like( $File::Next::dir, qr{^\Q$swamp}, '$File::Next::dir in $descend_filter' );
     };

Modified: branches/upstream/libfile-next-perl/current/t/basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/basic.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/basic.t (original)
+++ branches/upstream/libfile-next-perl/current/t/basic.t Wed Aug  5 05:01:36 2009
@@ -52,7 +52,6 @@
         t/swamp/c/c2
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_PARMS' );
 }
 
@@ -71,7 +70,6 @@
         t/swamp/c/c2
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'MULTIPLE_STARTS' );
 }
 
@@ -123,7 +121,6 @@
         t/swamp/perl.pod
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'ONLY_FILES_WITH_AN_EXTENSION' );
 }
 

Modified: branches/upstream/libfile-next-perl/current/t/dirs.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/dirs.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/dirs.t (original)
+++ branches/upstream/libfile-next-perl/current/t/dirs.t Wed Aug  5 05:01:36 2009
@@ -25,6 +25,5 @@
         t/swamp/c/
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_PARMS' );
 }

Modified: branches/upstream/libfile-next-perl/current/t/dot.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/dot.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/dot.t (original)
+++ branches/upstream/libfile-next-perl/current/t/dot.t Wed Aug  5 05:01:36 2009
@@ -53,6 +53,5 @@
         swamp/perl.pod
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_PARMS' );
 }

Modified: branches/upstream/libfile-next-perl/current/t/everything.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/everything.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/everything.t (original)
+++ branches/upstream/libfile-next-perl/current/t/everything.t Wed Aug  5 05:01:36 2009
@@ -57,7 +57,6 @@
         t/zero.t
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_PARMS' );
 }
 
@@ -84,6 +83,5 @@
         t/zero.t
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_PARMS' );
 }

Modified: branches/upstream/libfile-next-perl/current/t/follow.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/follow.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/follow.t (original)
+++ branches/upstream/libfile-next-perl/current/t/follow.t Wed Aug  5 05:01:36 2009
@@ -62,7 +62,6 @@
     my @actual = slurp( $iter );
     my @expected = ( @realfiles, @symlinkage );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'DEFAULT' );
 }
 
@@ -73,7 +72,6 @@
     my @actual = slurp( $iter );
     my @expected = ( @realfiles );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_FOLLOW' );
 }
 
@@ -84,7 +82,6 @@
     my @actual = slurp( $iter );
     my @expected = grep { /linkdir/ } @symlinkage;
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'NO_FOLLOW_STARTING_WITH_A_SYMLINK' );
 }
 

Modified: branches/upstream/libfile-next-perl/current/t/sort.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/sort.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/sort.t (original)
+++ branches/upstream/libfile-next-perl/current/t/sort.t Wed Aug  5 05:01:36 2009
@@ -40,7 +40,6 @@
 
     my @expected = @sorted_swamp;
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'SORT_BOOLEAN' );
 }
 
@@ -52,7 +51,6 @@
 
     my @expected = @sorted_swamp;
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'SORT_STANDARD' );
 }
 
@@ -64,6 +62,5 @@
 
     my @expected = reverse @sorted_swamp;
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'SORT_REVERSE' );
 }

Modified: branches/upstream/libfile-next-perl/current/t/zero.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-next-perl/current/t/zero.t?rev=41354&op=diff
==============================================================================
--- branches/upstream/libfile-next-perl/current/t/zero.t (original)
+++ branches/upstream/libfile-next-perl/current/t/zero.t Wed Aug  5 05:01:36 2009
@@ -42,6 +42,5 @@
         perl.pod
     );
 
-    @actual = grep { !/\.svn/ } @actual; # If I'm building this in my Subversion dir
     sets_match( \@actual, \@expected, 'HANDLE_ZEROES' );
 }




More information about the Pkg-perl-cvs-commits mailing list