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

js pushed a commit to branch master
in repository libtypes-uri-perl.

commit 8bb3de4c2833dcc1a67e96ae1a63a84cf464727c
Author: Toby Inkster <[email protected]>
Date:   Sun Sep 28 07:36:52 2014 +0100

    runtime load IRI
---
 lib/Types/URI.pm | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/lib/Types/URI.pm b/lib/Types/URI.pm
index f7a5dcf..918f333 100644
--- a/lib/Types/URI.pm
+++ b/lib/Types/URI.pm
@@ -47,15 +47,15 @@ __PACKAGE__->meta->add_type({
 });
 
 Iri->coercion->add_type_coercions(
-       Uuid        ,=> q{ do { use IRI (); "IRI"->new("urn:uuid:$_") } },
-       Str         ,=> q{ do { use IRI (); "IRI"->new($_) } },
-       Path        ,=> q{ do { use IRI (); my $u = "URI::file"->new($_); 
"IRI"->new($u->as_string) } },
-       ScalarRef   ,=> q{ do { use IRI (); my $u = "URI"->new("data:"); 
$u->data($$_); "IRI"->new($u->as_string) } },
-       HashRef     ,=> q{ do { use IRI (); "IRI"->new(URI::FromHash::uri(%$_)) 
} },
-       $TrineNode  ,=> q{ do { use IRI (); "IRI"->new($_->uri_value) } },
-       $TrineNS    ,=> q{ do { use IRI (); "IRI"->new($_->uri->uri_value) } },
-       $XmlNS      ,=> q{ do { use IRI (); "IRI"->new($_->uri) } },
-       Uri         ,=> q{ do { use IRI (); "IRI"->new($_->as_string) } },
+       Uuid        ,=> q{ do { require IRI; "IRI"->new("urn:uuid:$_") } },
+       Str         ,=> q{ do { require IRI; "IRI"->new($_) } },
+       Path        ,=> q{ do { require IRI; my $u = "URI::file"->new($_); 
"IRI"->new($u->as_string) } },
+       ScalarRef   ,=> q{ do { require IRI; my $u = "URI"->new("data:"); 
$u->data($$_); "IRI"->new($u->as_string) } },
+       HashRef     ,=> q{ do { require IRI; 
"IRI"->new(URI::FromHash::uri(%$_)) } },
+       $TrineNode  ,=> q{ do { require IRI; "IRI"->new($_->uri_value) } },
+       $TrineNS    ,=> q{ do { require IRI; "IRI"->new($_->uri->uri_value) } },
+       $XmlNS      ,=> q{ do { require IRI; "IRI"->new($_->uri) } },
+       Uri         ,=> q{ do { require IRI; "IRI"->new($_->as_string) } },
 );
 
 __PACKAGE__->meta->add_type({

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/libtypes-uri-perl.git

_______________________________________________
Pkg-perl-cvs-commits mailing list
[email protected]
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to