[SCM] libtype-tiny-perl Debian packaging branch, master, updated. debian/0.016-1-48-ga7f6748
Toby Inkster
mail at tobyinkster.co.uk
Mon Jul 29 12:55:01 UTC 2013
The following commit has been merged in the master branch:
commit d9f355cc4261aa0ddb2f02283ec17ee75a0c02e7
Author: Toby Inkster <mail at tobyinkster.co.uk>
Date: Fri Jul 19 11:14:20 2013 +0100
stop using constant.pm because it's actually pretty heavy (drags in unicore)
diff --git a/lib/Type/Params.pm b/lib/Type/Params.pm
index 3cfd306..39f8011 100644
--- a/lib/Type/Params.pm
+++ b/lib/Type/Params.pm
@@ -27,10 +27,13 @@ use base qw< Exporter::TypeTiny >;
our @EXPORT = qw( compile );
our @EXPORT_OK = qw( validate Invocant );
-use constant Invocant => "Type::Tiny::Union"->new(
- name => "Invocant",
- type_constraints => [Object, ClassName],
-);
+BEGIN {
+ my $Invocant = 'Type::Tiny::Union'->new(
+ name => 'Invocant',
+ type_constraints => [Object, ClassName],
+ );
+ sub Invocant () { $Invocant };
+};
#sub _exporter_expand_sub
#{
--
libtype-tiny-perl Debian packaging
More information about the Pkg-perl-cvs-commits
mailing list