r49329 - in /branches/upstream/libmoosex-types-perl/current: ./ lib/MooseX/ lib/MooseX/Types/ t/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Thu Dec 24 14:20:50 UTC 2009


Author: jawnsy-guest
Date: Thu Dec 24 14:20:41 2009
New Revision: 49329

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=49329
Log:
[svn-upgrade] Integrating new upstream version, libmoosex-types-perl (0.21)

Modified:
    branches/upstream/libmoosex-types-perl/current/Changes
    branches/upstream/libmoosex-types-perl/current/META.yml
    branches/upstream/libmoosex-types-perl/current/Makefile.PL
    branches/upstream/libmoosex-types-perl/current/README
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Base.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/CheckedUtilExports.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Combine.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Moose.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/TypeDecorator.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/UndefinedType.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Util.pm
    branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Wrapper.pm
    branches/upstream/libmoosex-types-perl/current/t/18_combined_libs.t

Modified: branches/upstream/libmoosex-types-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/Changes?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/Changes (original)
+++ branches/upstream/libmoosex-types-perl/current/Changes Thu Dec 24 14:20:41 2009
@@ -1,4 +1,12 @@
 Revision history for MooseX-Types
+
+
+0.21    Thu Dec 24 00:21:26 EST 2009
+        - Attempting to import a non-existent type from a combined type
+          library gave a very confusing error message from the
+          MooseX::Types::Combined internals. Now it gives you a much more
+          useful message. (Dave Rolsky)
+        - bump up Moose dep (RT#53016)
 
 0.20    Thu Sep 10 22:34:48 EDT 2009
         - fix "empty export" warning (doy).

Modified: branches/upstream/libmoosex-types-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/META.yml?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/META.yml (original)
+++ branches/upstream/libmoosex-types-perl/current/META.yml Thu Dec 24 14:20:41 2009
@@ -24,27 +24,35 @@
 provides:
   MooseX::Types:
     file: lib/MooseX/Types.pm
-    version: 0.20
+    version: 0.21
   MooseX::Types::Base:
     file: lib/MooseX/Types/Base.pm
+    version: 0.21
   MooseX::Types::CheckedUtilExports:
     file: lib/MooseX/Types/CheckedUtilExports.pm
+    version: 0.21
   MooseX::Types::Combine:
     file: lib/MooseX/Types/Combine.pm
+    version: 0.21
   MooseX::Types::Moose:
     file: lib/MooseX/Types/Moose.pm
+    version: 0.21
   MooseX::Types::TypeDecorator:
     file: lib/MooseX/Types/TypeDecorator.pm
+    version: 0.21
   MooseX::Types::UndefinedType:
     file: lib/MooseX/Types/UndefinedType.pm
+    version: 0.21
   MooseX::Types::Util:
     file: lib/MooseX/Types/Util.pm
+    version: 0.21
   MooseX::Types::Wrapper:
     file: lib/MooseX/Types/Wrapper.pm
+    version: 0.21
 requires:
   Carp: 0
   Carp::Clan: 6.00
-  Moose: 0.61
+  Moose: 0.93
   Scalar::Util: 1.19
   Sub::Install: 0.924
   Sub::Name: 0
@@ -52,4 +60,4 @@
   perl: 5.8.0
 resources:
   license: http://dev.perl.org/licenses/
-version: 0.20
+version: 0.21

Modified: branches/upstream/libmoosex-types-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/Makefile.PL?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/Makefile.PL (original)
+++ branches/upstream/libmoosex-types-perl/current/Makefile.PL Thu Dec 24 14:20:41 2009
@@ -14,7 +14,7 @@
 build_requires  q{Test::Moose},                 0;
 build_requires  q{Test::Exception},             0;
 
-requires        q{Moose},                       '0.61';
+requires        q{Moose},                       '0.93';
 requires        q{Sub::Install},                '0.924';
 requires        q{namespace::clean},            '0.08';
 requires        q{Carp},                        0;

Modified: branches/upstream/libmoosex-types-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/README?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/README (original)
+++ branches/upstream/libmoosex-types-perl/current/README Thu Dec 24 14:20:41 2009
@@ -379,6 +379,8 @@
 
     hdp: Hans Dieter Pearcey <hdp at cpan.org>
 
+    autarch: Dave Rolsky <autarch at urth.org>
+
 COPYRIGHT & LICENSE
     Copyright (c) 2007-2009 Robert Sedlacek <rs at 474.at>
 

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types.pm Thu Dec 24 14:20:41 2009
@@ -20,7 +20,7 @@
 use namespace::clean -except => [qw( meta )];
 
 use 5.008;
-our $VERSION = '0.20';
+our $VERSION = '0.21';
 my $UndefMsg = q{Action for type '%s' not yet defined in library '%s'};
 
 =head1 SYNOPSIS
@@ -597,6 +597,8 @@
 
 hdp: Hans Dieter Pearcey <hdp at cpan.org>
 
+autarch: Dave Rolsky <autarch at urth.org>
+
 =head1 COPYRIGHT & LICENSE
 
 Copyright (c) 2007-2009 Robert Sedlacek <rs at 474.at>

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Base.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Base.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Base.pm Thu Dec 24 14:20:41 2009
@@ -1,4 +1,5 @@
 package MooseX::Types::Base;
+our $VERSION = "0.21";
 use Moose;
 
 =head1 NAME

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/CheckedUtilExports.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/CheckedUtilExports.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/CheckedUtilExports.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/CheckedUtilExports.pm Thu Dec 24 14:20:41 2009
@@ -6,6 +6,7 @@
 =cut
 
 package MooseX::Types::CheckedUtilExports;
+our $VERSION = "0.21";
 
 use strict;
 use warnings;

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Combine.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Combine.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Combine.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Combine.pm Thu Dec 24 14:20:41 2009
@@ -5,6 +5,7 @@
 =cut
 
 package MooseX::Types::Combine;
+our $VERSION = "0.21";
 
 use strict;
 use warnings;
@@ -44,7 +45,14 @@
     } @type_libs;
 
     my %from;
-    push @{ $from{ $types{ $_ } } }, $_ for @types;
+    for my $type (@types) {
+        die
+            "$caller asked for a type ($type) which is not found in any of the"
+            . " type libraries (@type_libs) combined by $class\n"
+            unless $types{$type};
+
+        push @{ $from{ $types{$type} } }, $type;
+    }
 
     $_->import({ -into => $caller }, @{ $from{ $_ } })
         for keys %from;

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Moose.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Moose.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Moose.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Moose.pm Thu Dec 24 14:20:41 2009
@@ -1,4 +1,5 @@
 package MooseX::Types::Moose;
+our $VERSION = "0.21";
 
 =head1 NAME
 

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/TypeDecorator.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/TypeDecorator.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/TypeDecorator.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/TypeDecorator.pm Thu Dec 24 14:20:41 2009
@@ -1,4 +1,5 @@
 package MooseX::Types::TypeDecorator;
+our $VERSION = "0.21";
 
 use strict;
 use warnings;

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/UndefinedType.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/UndefinedType.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/UndefinedType.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/UndefinedType.pm Thu Dec 24 14:20:41 2009
@@ -1,4 +1,5 @@
 package MooseX::Types::UndefinedType;
+our $VERSION = "0.21";
 
 =head1 NAME
 

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Util.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Util.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Util.pm Thu Dec 24 14:20:41 2009
@@ -1,4 +1,5 @@
 package MooseX::Types::Util;
+our $VERSION = "0.21";
 
 =head1 NAME
 

Modified: branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Wrapper.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Wrapper.pm?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Wrapper.pm (original)
+++ branches/upstream/libmoosex-types-perl/current/lib/MooseX/Types/Wrapper.pm Thu Dec 24 14:20:41 2009
@@ -5,6 +5,7 @@
 =cut
 
 package MooseX::Types::Wrapper;
+our $VERSION = "0.21";
 use Moose;
 
 use Carp::Clan      qw( ^MooseX::Types );

Modified: branches/upstream/libmoosex-types-perl/current/t/18_combined_libs.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-types-perl/current/t/18_combined_libs.t?rev=49329&op=diff
==============================================================================
--- branches/upstream/libmoosex-types-perl/current/t/18_combined_libs.t (original)
+++ branches/upstream/libmoosex-types-perl/current/t/18_combined_libs.t Thu Dec 24 14:20:41 2009
@@ -3,8 +3,9 @@
 use warnings;
 use FindBin;
 use lib "$FindBin::Bin/lib";   
- 
-use Test::More tests => 4;
+
+use Test::More tests => 5;
+use Test::Exception;
 
 BEGIN { use_ok 'Combined', qw/Foo2Alias MTFNPY NonEmptyStr/ }
 
@@ -16,3 +17,7 @@
 
 is NonEmptyStr->name, 'TestLibrary2::NonEmptyStr',
     'precedence for conflicting types is correct';
+
+throws_ok { Combined->import('NonExistentType') }
+qr/\Qmain asked for a type (NonExistentType) which is not found in any of the type libraries (TestLibrary TestLibrary2) combined by Combined/,
+'asking for a non-existent type from a combined type library gives a useful error';




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