r43251 - in /branches/upstream/libarray-compare-perl/current: Build.PL Changes META.yml Makefile.PL lib/Array/Compare.pm

nhandler-guest at users.alioth.debian.org nhandler-guest at users.alioth.debian.org
Sat Aug 29 19:56:27 UTC 2009


Author: nhandler-guest
Date: Sat Aug 29 19:56:21 2009
New Revision: 43251

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=43251
Log:
[svn-upgrade] Integrating new upstream version, libarray-compare-perl (2.01)

Modified:
    branches/upstream/libarray-compare-perl/current/Build.PL
    branches/upstream/libarray-compare-perl/current/Changes
    branches/upstream/libarray-compare-perl/current/META.yml
    branches/upstream/libarray-compare-perl/current/Makefile.PL
    branches/upstream/libarray-compare-perl/current/lib/Array/Compare.pm

Modified: branches/upstream/libarray-compare-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libarray-compare-perl/current/Build.PL?rev=43251&op=diff
==============================================================================
--- branches/upstream/libarray-compare-perl/current/Build.PL (original)
+++ branches/upstream/libarray-compare-perl/current/Build.PL Sat Aug 29 19:56:21 2009
@@ -1,11 +1,11 @@
 use Module::Build;
 my $build = Module::Build->new(
-        dist_version => '1.17',
 	module_name => 'Array::Compare',
 	license => 'perl',
 	requires => {
-		perl                => '5.6.0',
-		Carp                => 0,
+		perl    => '5.6.0',
+		Carp    => 0,
+		Moose	=> 0,
 	},
 	build_recommends => {
 		Test::Pod           => 0,

Modified: branches/upstream/libarray-compare-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libarray-compare-perl/current/Changes?rev=43251&op=diff
==============================================================================
--- branches/upstream/libarray-compare-perl/current/Changes (original)
+++ branches/upstream/libarray-compare-perl/current/Changes Sat Aug 29 19:56:21 2009
@@ -1,68 +1,227 @@
-2007-04-01  dave
-
-	* [r23] README.xml: Updated copyright dates
-	* [r22] lib/Array/Compare.pm: Changed $VERSION definition
-	* [r21] Build.PL: Changed create_makefile_pl parameter to
-	  'traditional'
-
-2005-10-01  dave
-
-	* [r19] MANIFEST: Reordering
-
-2005-09-21  dave
-
-	* [r18] lib/Array/Compare.pm: Documentation fix
-
-2005-07-10  dave
-
-	* [r17] MANIFEST: Added t/pod_coverage to MANIFEST
-	* [r16] Makefile.PL: Removed Makefile.PL (which is autogenerated)
-
-2005-03-01  dave
-
-	* [r15] lib/Array/Compare.pm, t/pod_coverage.t: Changes to pass
-	  Pod::Coverage tests (and, hence, increase kwalitee)
-
-2004-10-23  dave
-
-	* [r14] lib/Array/Compare.pm, t/test.t: Improved test coverage
-
-2004-10-22  dave
-
-	* [r13] lib/Array/Compare.pm: Improved docs for full comparison
-	* [r12] t/pod.t: Updated pod tests
-
-2004-05-13  dave
-
-	* [r11] README.xml: Small formatting changes
-
-2004-05-12  dave
-
-	* [r10] Makefile.PL: Added Makefile.PL
-	* [r9] MANIFEST, t, t/pod.t, t/test.t: Added various files to cvs
-
-2003-09-19  dave
-
-	* [r8] lib/Array/Compare.pm: Bring CVS version into line with old
-	  file
-	* [r7] Build.PL, Compare.pm, README.xml, lib, lib/Array,
-	  lib/Array/Compare.pm, test.pl: Bit of an overhaul
-
-2002-03-29  dave
-
-	* [r6] Compare.pm: Test version
-	* [r5] README.xml: README input file
-	* [r4] test.pl: Test script.
-
-2002-01-09  dave
-
-	* [r3] Compare.pm: Small cleanups
-
-2001-12-09  dave
-
-	* [r2] Compare.pm: Cleanup.
-
-2001-12-09  
-
-	* [r1] branches, tags, .: New repository initialized by cvs2svn.
-
+2009-08-29 16:05  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Bump version number.
+
+	* commit a262ffcf9c4cde040daef8bf78557422fa28eec7
+
+2009-08-09 20:03  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Corrected version number.
+
+	* commit a985589668e20aa48ffca58a3455c4a27e02a479
+
+2009-08-09 20:00  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL: Bumped version number.
+
+	* commit 25853dd748932025ea2d6b32ae7137c802b666aa
+
+2009-08-09 20:00  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Switched to using Moose.
+
+	* commit 220f0589377b338193ede53e0e9ddfdc611a4598
+
+2009-06-14 20:11  Dave Cross  <dave at dave.org.uk>
+
+	* README, README.xml: Renames README.xml
+
+	* commit 3f25ef126d877b1a8eac207aa0512367751ad761
+
+2009-06-14 18:58  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Bump version number for release.
+
+	* commit 4a288d2dd0665ab83acd16b21d27c0ad20b69cea
+
+2009-06-14 18:56  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Added version number.  Fixed
+	https://rt.cpan.org/Ticket/Display.html?id=45145
+
+	* commit 58ace450d5987b9e5d7a215a9244ebf8fac57665
+
+2009-06-14 18:55  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL: Moved version setting into .pm.
+
+	* commit ffcdc2f227ba7f60b91c8c188a786c3efd94d1df
+
+2009-02-21 22:08  Dave Cross  <dave at dave.org.uk>
+
+	* : Removed execute bit.
+
+	* commit d146a1ff737ca7791cbb83d76102a703d08faf6f
+
+2008-06-29 14:04  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL, lib/Array/Compare.pm: Added LICENSE section (for
+	cpants).
+
+	* commit f41bdfdae903930248bdae698de707486b50e7ab
+
+2008-03-06 22:04  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Increment version number
+
+	* commit 145352201851bf61af94bdfd40772d9cc96dba20
+
+2008-03-06 22:04  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL: Fix prerequisites
+
+	* commit d06f5a3ff78dd9aa63e974c5df806a317c751c0c
+
+2008-03-06 22:03  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Require Perl 5.6 so we can use warnings
+	and our.
+
+	* commit c8690e96063f6707b99896f8b142396c7172185a
+
+2007-04-04 06:16  Dave Cross  <dave at dave.org.uk>
+
+	* : Another attempt at removing the execute bit
+
+	* commit 9661677cb4856827f389acd006f7095c838947cf
+
+2007-04-02 07:26  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL: Made Build.PL non-executable
+
+	* commit 4690bb3f33328db22566615e1c2856689a065fce
+
+2007-04-01 15:11  Dave Cross  <dave at dave.org.uk>
+
+	* README.xml: Updated copyright dates
+
+	* commit 32f9b57d8f33dd0c57440f4d28f485f252efb290
+
+2007-04-01 15:03  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Changed $VERSION definition
+
+	* commit 96d68069be6399cbd1b2015a2c1116553741a206
+
+2007-04-01 14:55  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL: Changed create_makefile_pl parameter to 'traditional'
+
+	* commit cf040034db4a784e134bbea56f1dedee7fb8f999
+
+2005-10-01 17:17  Dave Cross  <dave at dave.org.uk>
+
+	* MANIFEST: Reordering
+
+	* commit 76195c6b17f45fa0e7850ccb14796df7f5b77cb4
+
+2005-09-21 09:23  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Documentation fix
+
+	* commit 80714622168b2f16d29d5ef7c0d2a591964c4790
+
+2005-07-10 12:33  Dave Cross  <dave at dave.org.uk>
+
+	* MANIFEST: Added t/pod_coverage to MANIFEST
+
+	* commit c28ff1c2763ebb0d97af1f058e1e8ca439c93a51
+
+2005-07-10 12:33  Dave Cross  <dave at dave.org.uk>
+
+	* Makefile.PL: Removed Makefile.PL (which is autogenerated)
+
+	* commit afddc5de0dab39e06ce5090c9d8fa39da07c72fd
+
+2005-03-01 09:05  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm, t/pod_coverage.t: Changes to pass
+	Pod::Coverage tests (and, hence, increase kwalitee)
+
+	* commit c9d84347353406b5863a9a7e35d876b63c64f9ef
+
+2004-10-23 08:11  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm, t/test.t: Improved test coverage
+
+	* commit a48e05ce7aed91cda36390e31364c9a37e0a5f02
+
+2004-10-22 20:32  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Improved docs for full comparison
+
+	* commit 612b14b51e6fc4c9db74d8eb4536c45358c12fef
+
+2004-10-22 20:17  Dave Cross  <dave at dave.org.uk>
+
+	* t/pod.t: Updated pod tests
+
+	* commit 1eed7b71d50037dc0898f00c227a8a825b7e03f0
+
+2004-05-13 20:01  Dave Cross  <dave at dave.org.uk>
+
+	* README.xml: Small formatting changes
+
+	* commit 250b1f35ec93c2dc82beb416ae2c0b13ec8f52ad
+
+2004-05-12 22:52  Dave Cross  <dave at dave.org.uk>
+
+	* Makefile.PL: Added Makefile.PL
+
+	* commit de64fdee81cf0c36d56b461ff87bc6e8192ba7b7
+
+2004-05-12 22:49  Dave Cross  <dave at dave.org.uk>
+
+	* MANIFEST, t/pod.t, t/test.t: Added various files to cvs
+
+	* commit 7b65234160e57a10deb8372a2d9a35e4f7652e4f
+
+2003-09-19 09:37  Dave Cross  <dave at dave.org.uk>
+
+	* lib/Array/Compare.pm: Bring CVS version into line with old file
+
+	* commit 47074ab42920d95b30ee18c53eaaaeb1c8e0f63c
+
+2003-09-19 09:34  Dave Cross  <dave at dave.org.uk>
+
+	* Build.PL, Compare.pm, README.xml, lib/Array/Compare.pm, test.pl:
+	Bit of an overhaul
+
+	* commit f67f37c0d05b38d45b29601da9fa09b5dd507005
+
+2002-03-29 17:45  Dave Cross  <dave at dave.org.uk>
+
+	* Compare.pm: Test version
+
+	* commit ecefb3dc62940bf64e84186bd999486173223448
+
+2002-03-29 17:44  Dave Cross  <dave at dave.org.uk>
+
+	* README.xml: README input file
+
+	* commit cb67625e1246ec65d64e060fd7e3ca8dafdf39d8
+
+2002-03-29 17:43  Dave Cross  <dave at dave.org.uk>
+
+	* test.pl: Test script.
+
+	* commit 5f7b15b567d343e4176f0b7d90d1508da793ee79
+
+2002-01-09 11:41  Dave Cross  <dave at dave.org.uk>
+
+	* Compare.pm: Small cleanups
+
+	* commit 1eb540f3c64cbbb807444e18c0476c5531ef412c
+
+2001-12-09 19:31  Dave Cross  <dave at dave.org.uk>
+
+	* Compare.pm: Cleanup.
+
+	* commit 475fbeab7abcda9696b5b2db3d8673ab407e8304
+
+2001-12-09 19:31  (no author)  <(no author)>
+
+	* : New repository initialized by cvs2svn.
+
+	* commit 2e57c5d3db773149fcbd659e568cc46c9993303c
+

Modified: branches/upstream/libarray-compare-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libarray-compare-perl/current/META.yml?rev=43251&op=diff
==============================================================================
--- branches/upstream/libarray-compare-perl/current/META.yml (original)
+++ branches/upstream/libarray-compare-perl/current/META.yml Sat Aug 29 19:56:21 2009
@@ -1,6 +1,6 @@
 ---
 name: Array-Compare
-version: 1.17
+version: 2.01
 author:
   - 'Dave Cross <dave at mag-sol.com>'
 abstract: Perl extension for comparing arrays.
@@ -9,12 +9,13 @@
   license: http://dev.perl.org/licenses/
 requires:
   Carp: 0
+  Moose: 0
   perl: 5.6.0
 provides:
   Array::Compare:
     file: lib/Array/Compare.pm
-    version: 33
-generated_by: Module::Build version 0.280801
+    version: 2.01
+generated_by: Module::Build version 0.32
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.2.html
   version: 1.2

Modified: branches/upstream/libarray-compare-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libarray-compare-perl/current/Makefile.PL?rev=43251&op=diff
==============================================================================
--- branches/upstream/libarray-compare-perl/current/Makefile.PL (original)
+++ branches/upstream/libarray-compare-perl/current/Makefile.PL Sat Aug 29 19:56:21 2009
@@ -1,4 +1,4 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.2808_01
+# Note: this file was auto-generated by Module::Build::Compat version 0.32
 require 5.6.0;
 use ExtUtils::MakeMaker;
 WriteMakefile
@@ -6,10 +6,10 @@
           'NAME' => 'Array::Compare',
           'VERSION_FROM' => 'lib/Array/Compare.pm',
           'PREREQ_PM' => {
-                           'Carp' => 0
+                           'Carp' => 0,
+                           'Moose' => 0
                          },
           'INSTALLDIRS' => 'site',
-          'EXE_FILES' => [],
-          'PL_FILES' => {}
+          'EXE_FILES' => []
         )
 ;

Modified: branches/upstream/libarray-compare-perl/current/lib/Array/Compare.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libarray-compare-perl/current/lib/Array/Compare.pm?rev=43251&op=diff
==============================================================================
--- branches/upstream/libarray-compare-perl/current/lib/Array/Compare.pm (original)
+++ branches/upstream/libarray-compare-perl/current/lib/Array/Compare.pm Sat Aug 29 19:56:21 2009
@@ -1,5 +1,5 @@
 #
-# $Id: Compare.pm 33 2008-12-18 11:34:24Z dave $
+# $Id$
 #
 
 =head1 NAME
@@ -183,15 +183,16 @@
 use warnings;
 our ($VERSION, $AUTOLOAD);
 
+use Moose;
 use Carp;
 
-($VERSION) = '$Id: Compare.pm 33 2008-12-18 11:34:24Z dave $' =~ /(\d+)/;
-
-my %_defaults = (Sep => '^G',
-		 WhiteSpace => 1,
-                 Case => 1,
-		 Skip => {},
-		 DefFull => 0);
+$VERSION = '2.01';
+
+has Sep        => ( is => 'rw', isa => 'Str',     default => '^G' );
+has WhiteSpace => ( is => 'rw', isa => 'Bool',    default => 1 );
+has Case       => ( is => 'rw', isa => 'Bool',    default => 1 );
+has DefFull    => ( is => 'rw', isa => 'Bool',    default => 0 );
+has Skip       => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
 
 =head2 new [ %OPTIONS ]
 
@@ -236,16 +237,6 @@
 =back
 
 =cut
-
-sub new {
-  my $class = shift;
-
-  my $self = {%_defaults, @_};
-
-  bless $self, $class;
-
-  return $self;
-}
 
 #
 # Utility function to check the arguments to any of the comparison
@@ -325,6 +316,7 @@
   my @check = 0 .. $#$row1;
 
   my ($pkg, $caller) = (caller(1))[0, 3];
+  $caller = '' unless defined $caller;
   my $perm = $caller eq __PACKAGE__ . "::perm";
 
   # Filter @check so it only contains indexes that should be compared.
@@ -448,41 +440,8 @@
   return $self->simple_compare([sort @{$_[0]}], [sort @{$_[1]}]);
 }
 
-#
-# Attempt to be clever with object attributes.
-# Each object attribute is always accessed using an access method.
-# None of these access methods exist in the object code.
-# If an unknown method is called then the AUTOLOAD method is called
-# in its place with the same parameters and the variable $AUTOLOAD
-# set to the name of the unknown method.
-#
-# In this function we work out which method has been called and
-# simulate it by returning the correct attribute value (and setting
-# it to a new value if the method was passed a new value to use).
-#
-# We're also a little cleverer than that as we create a new method on
-# the fly so that the next time we call the missing method it has
-# magically sprung into existance, thereby avoiding the overhead of
-# calling AUTOLOAD more than once for each method called.
-#
-sub AUTOLOAD {
-  no strict 'refs';
-  my ($self, $val) = @_;
-  my ($name) = $AUTOLOAD =~ m/.*::(\w*)/;
-
-  *{$AUTOLOAD} = sub { return @_ > 1 ?
-			 $_[0]->{$name} = $_[1] :
-			   $_[0]->{$name}};
-
-  return defined $val ? $self->{$name} = $val : $self->{$name};
-}
-
-#
-# One (small) downside of the AUTOLOAD trick, is that we need to
-# explicitly define a DESTROY method to prevent Perl from passing
-# those calls to AUTOLOAD. In this case we don't need to do anything.
-#
-sub DESTROY { }
+no Moose;
+__PACKAGE__->meta->make_immutable;
 
 1;
 __END__




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