[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