[libdbix-class-encodedcolumn-perl] 01/07: Imported Upstream version 0.00013

gregor herrmann gregoa at debian.org
Fri Feb 28 14:12:49 UTC 2014


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libdbix-class-encodedcolumn-perl.

commit c4a75b76b3a00198512586c964039039f2172886
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri Feb 28 15:04:49 2014 +0100

    Imported Upstream version 0.00013
---
 Changes                                            |  3 ++
 MANIFEST                                           |  3 ++
 META.yml                                           | 11 ++--
 Makefile.PL                                        | 11 ++++
 inc/Module/Install/AuthorRequires.pm               | 38 ++++++++++++++
 inc/Module/Install/AuthorTests.pm                  | 59 ++++++++++++++++++++++
 inc/Module/Install/ReadmeFromPod.pm                |  2 +-
 lib/DBIx/Class/EncodedColumn.pm                    |  2 +-
 .../EncodedColumn/Crypt/Eksblowfish/Bcrypt.pm      |  2 +-
 lib/DBIx/Class/EncodedColumn/Digest.pm             |  2 +-
 t/bcrypt.t                                         |  1 -
 t/class_level_encoders.t                           |  1 -
 t/digest_sha.t                                     |  1 -
 t/lib/DigestTest/Schema/WithTimeStamp.pm           | 37 ++++++++++++++
 t/open_pgp.t                                       |  3 +-
 t/whirlpool.t                                      |  1 -
 16 files changed, 164 insertions(+), 13 deletions(-)

diff --git a/Changes b/Changes
index 30ca8dc..614f569 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+0.00013 2014-02-27
+        - Pod fixes (RT#88875)
+        - Fix deps (github#1)
 0.00012 2013-04-29
         - Fixes reported bug #78091. (gbjk++) 
 0.00011 2011-04-11
diff --git a/MANIFEST b/MANIFEST
index f9cf86d..acbc2ba 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1,6 +1,8 @@
 Changes
 inc/Module/AutoInstall.pm
 inc/Module/Install.pm
+inc/Module/Install/AuthorRequires.pm
+inc/Module/Install/AuthorTests.pm
 inc/Module/Install/AutoInstall.pm
 inc/Module/Install/Base.pm
 inc/Module/Install/Can.pm
@@ -31,6 +33,7 @@ t/lib/DigestTest/Schema/pubring.gpg
 t/lib/DigestTest/Schema/secring.gpg
 t/lib/DigestTest/Schema/SHA.pm
 t/lib/DigestTest/Schema/Whirlpool.pm
+t/lib/DigestTest/Schema/WithTimeStamp.pm
 t/open_pgp.t
 t/var/DigestTest-Schema-1.x-SQLite.sql
 t/whirlpool.t
diff --git a/META.yml b/META.yml
index 8e27413..b8b67f0 100644
--- a/META.yml
+++ b/META.yml
@@ -23,11 +23,16 @@ no_index:
   directory:
     - inc
     - t
+recommends:
+  Crypt::OpenPGP: 0
+  Digest: 0
+  Digest::SHA: 0
+  Math::Pari: 0
 requires:
-  DBIx::Class: 0.06002
+  DBIx::Class: '0.06002'
   Encode: 0
-  Sub::Name: 0.04
+  Sub::Name: '0.04'
 resources:
   license: http://dev.perl.org/licenses/
   repository: git://github.com/wreis/DBIx-Class-EncodedColumn.git
-version: 0.00012
+version: '0.00013'
diff --git a/Makefile.PL b/Makefile.PL
index cf81464..7bdc951 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -3,6 +3,8 @@
 # Load the Module::Install bundled in ./inc/
 use inc::Module::Install;
 use Module::Install::ReadmeFromPod;
+use Module::Install::AuthorTests;
+use Module::Install::AuthorRequires;
 
 # Define metadata
 name 'DBIx-Class-EncodedColumn';
@@ -23,6 +25,15 @@ test_requires 'Dir::Self';
 test_requires 'File::Temp';
 test_requires 'File::Spec';
 
+author_tests('t/author');
+author_requires 'Crypt::Eksblowfish::Bcrypt';
+author_requires 'DBIx::Class::TimeStamp';
+recommends 'Digest';
+recommends 'Digest::SHA';
+recommends 'Crypt::OpenPGP';
+# TODO: remove once Crypt::OpenPGP is fixed
+recommends 'Math::Pari';
+
 auto_install;
 
 WriteAll;
diff --git a/inc/Module/Install/AuthorRequires.pm b/inc/Module/Install/AuthorRequires.pm
new file mode 100644
index 0000000..838e144
--- /dev/null
+++ b/inc/Module/Install/AuthorRequires.pm
@@ -0,0 +1,38 @@
+#line 1
+use strict;
+use warnings;
+
+package Module::Install::AuthorRequires;
+
+use base 'Module::Install::Base';
+
+# cargo cult
+BEGIN {
+    our $VERSION = '0.02';
+    our $ISCORE  = 1;
+}
+
+sub author_requires {
+    my $self = shift;
+
+    return $self->{values}->{author_requires}
+        unless @_;
+
+    my @added;
+    while (@_) {
+        my $mod = shift or last;
+        my $version = shift || 0;
+        push @added, [$mod => $version];
+    }
+
+    push @{ $self->{values}->{author_requires} }, @added;
+    $self->admin->author_requires(@added);
+
+    return map { @$_ } @added;
+}
+
+1;
+
+__END__
+
+#line 92
diff --git a/inc/Module/Install/AuthorTests.pm b/inc/Module/Install/AuthorTests.pm
new file mode 100644
index 0000000..c44931b
--- /dev/null
+++ b/inc/Module/Install/AuthorTests.pm
@@ -0,0 +1,59 @@
+#line 1
+package Module::Install::AuthorTests;
+
+use 5.005;
+use strict;
+use Module::Install::Base;
+use Carp ();
+
+#line 16
+
+use vars qw{$VERSION $ISCORE @ISA};
+BEGIN {
+  $VERSION = '0.002';
+  $ISCORE  = 1;
+  @ISA     = qw{Module::Install::Base};
+}
+
+#line 42
+
+sub author_tests {
+  my ($self, @dirs) = @_;
+  _add_author_tests($self, \@dirs, 0);
+}
+
+#line 56
+
+sub recursive_author_tests {
+  my ($self, @dirs) = @_;
+  _add_author_tests($self, \@dirs, 1);
+}
+
+sub _wanted {
+  my $href = shift;
+  sub { /\.t$/ and -f $_ and $href->{$File::Find::dir} = 1 }
+}
+
+sub _add_author_tests {
+  my ($self, $dirs, $recurse) = @_;
+  return unless $Module::Install::AUTHOR;
+
+  my @tests = $self->tests ? (split / /, $self->tests) : 't/*.t';
+
+  # XXX: pick a default, later -- rjbs, 2008-02-24
+  my @dirs = @$dirs ? @$dirs : Carp::confess "no dirs given to author_tests";
+     @dirs = grep { -d } @dirs;
+
+  if ($recurse) {
+    require File::Find;
+    my %test_dir;
+    File::Find::find(_wanted(\%test_dir), @dirs);
+    $self->tests( join ' ', @tests, map { "$_/*.t" } sort keys %test_dir );
+  } else {
+    $self->tests( join ' ', @tests, map { "$_/*.t" } sort @dirs );
+  }
+}
+
+#line 107
+
+1;
diff --git a/inc/Module/Install/ReadmeFromPod.pm b/inc/Module/Install/ReadmeFromPod.pm
index 6a80818..b5e03c3 100644
--- a/inc/Module/Install/ReadmeFromPod.pm
+++ b/inc/Module/Install/ReadmeFromPod.pm
@@ -7,7 +7,7 @@ use warnings;
 use base qw(Module::Install::Base);
 use vars qw($VERSION);
 
-$VERSION = '0.20';
+$VERSION = '0.22';
 
 sub readme_from {
   my $self = shift;
diff --git a/lib/DBIx/Class/EncodedColumn.pm b/lib/DBIx/Class/EncodedColumn.pm
index 4d2e226..c3fbd3c 100644
--- a/lib/DBIx/Class/EncodedColumn.pm
+++ b/lib/DBIx/Class/EncodedColumn.pm
@@ -8,7 +8,7 @@ use Sub::Name;
 
 __PACKAGE__->mk_classdata( '_column_encoders' );
 
-our $VERSION = '0.00012';
+our $VERSION = '0.00013';
 $VERSION = eval $VERSION;
 
 sub register_column {
diff --git a/lib/DBIx/Class/EncodedColumn/Crypt/Eksblowfish/Bcrypt.pm b/lib/DBIx/Class/EncodedColumn/Crypt/Eksblowfish/Bcrypt.pm
index 4d348af..f54f784 100644
--- a/lib/DBIx/Class/EncodedColumn/Crypt/Eksblowfish/Bcrypt.pm
+++ b/lib/DBIx/Class/EncodedColumn/Crypt/Eksblowfish/Bcrypt.pm
@@ -56,7 +56,7 @@ __END__;
 
 =head1 NAME
 
-DBIx::Class::EncodedColumn::Crypt::Eksblowfish::Bcrypt
+DBIx::Class::EncodedColumn::Crypt::Eksblowfish::Bcrypt - Eksblowfish bcrypt backend
 
 =head1 SYNOPSYS
 
diff --git a/lib/DBIx/Class/EncodedColumn/Digest.pm b/lib/DBIx/Class/EncodedColumn/Digest.pm
index 7380684..3efd391 100644
--- a/lib/DBIx/Class/EncodedColumn/Digest.pm
+++ b/lib/DBIx/Class/EncodedColumn/Digest.pm
@@ -78,7 +78,7 @@ __END__;
 
 =head1 NAME
 
-DBIx::Class::EncodedColumn::Digest
+DBIx::Class::EncodedColumn::Digest - Digest backend
 
 =head1 SYNOPSYS
 
diff --git a/t/bcrypt.t b/t/bcrypt.t
index b7dc23a..9c2a753 100644
--- a/t/bcrypt.t
+++ b/t/bcrypt.t
@@ -1,4 +1,3 @@
-
 use strict;
 use warnings;
 use Test::More;
diff --git a/t/class_level_encoders.t b/t/class_level_encoders.t
index 9523838..5c1ac9f 100644
--- a/t/class_level_encoders.t
+++ b/t/class_level_encoders.t
@@ -1,4 +1,3 @@
-
 use strict;
 use warnings;
 use Test::More;
diff --git a/t/digest_sha.t b/t/digest_sha.t
index 3398012..2d5e7ef 100644
--- a/t/digest_sha.t
+++ b/t/digest_sha.t
@@ -1,4 +1,3 @@
-
 use strict;
 use warnings;
 use Test::More;
diff --git a/t/lib/DigestTest/Schema/WithTimeStamp.pm b/t/lib/DigestTest/Schema/WithTimeStamp.pm
new file mode 100644
index 0000000..8d8ad1d
--- /dev/null
+++ b/t/lib/DigestTest/Schema/WithTimeStamp.pm
@@ -0,0 +1,37 @@
+package # hide from PAUSE
+    DigestTest::Schema::WithTimeStamp;
+
+use strict;
+use warnings;
+use base qw/DBIx::Class::Core/;
+
+__PACKAGE__->load_components(qw/TimeStamp EncodedColumn/);
+__PACKAGE__->table('test_with_timestamp');
+__PACKAGE__->add_columns(
+  id => {
+    data_type => 'int',
+    is_nullable => 0,
+    is_auto_increment => 1
+  },
+  bcrypt_1 => {
+    data_type => 'text',
+    is_nullable => 1,
+    size => 60,
+    encode_column => 1,
+    encode_class  => 'Crypt::Eksblowfish::Bcrypt',
+    encode_check_method => 'bcrypt_1_check',
+  },
+  bcrypt_2 => {
+    data_type => 'text',
+    is_nullable => 1,
+    size => 59,
+    encode_column => 1,
+    encode_class  => 'Crypt::Eksblowfish::Bcrypt',
+    encode_args   => {key_nul => 0, cost => 6 },
+    encode_check_method => 'bcrypt_2_check',
+  },
+);
+
+__PACKAGE__->set_primary_key('id');
+
+1;
diff --git a/t/open_pgp.t b/t/open_pgp.t
index 87d4c00..ef692d1 100644
--- a/t/open_pgp.t
+++ b/t/open_pgp.t
@@ -1,4 +1,3 @@
-
 use strict;
 use warnings;
 use Test::More;
@@ -10,7 +9,7 @@ use lib File::Spec->catdir(__DIR__, 'lib');
 use DigestTest::Schema;
 
 BEGIN {
-  if( eval 'require Crypt::OpenPGP' ){
+  if( eval 'require Crypt::OpenPGP' && eval 'require Math::Pari' ){
     plan tests => 6;
   } else {
     plan skip_all => 'Crypt::OpenPGP not available';
diff --git a/t/whirlpool.t b/t/whirlpool.t
index f6d789f..2794dd6 100644
--- a/t/whirlpool.t
+++ b/t/whirlpool.t
@@ -1,4 +1,3 @@
-
 use strict;
 use warnings;
 use Test::More;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdbix-class-encodedcolumn-perl.git



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