[SCM] librdf-ns-perl Debian packaging branch, master, updated. debian/20130208-1-22-g47de138

Jakob Voss voss at gbv.de
Fri Apr 19 13:28:45 UTC 2013


The following commit has been merged in the master branch:
commit 561f84e1fe0369f42de6c9a395fecd40d9fefed5
Author: Jakob Voss <voss at gbv.de>
Date:   Mon Sep 17 08:13:19 2012 +0200

    fixed dependency

diff --git a/dist.ini b/dist.ini
index 2d5c1ce..a359025 100644
--- a/dist.ini
+++ b/dist.ini
@@ -2,8 +2,7 @@ name             = RDF-NS
 license          = Perl_5
 version          = 20120905
 copyright_year   = 2012
-author           = Jakob Voss
-copyright_holder = Jakob Voss
+author           = Jakob Voß
 
 [GatherDir]
 [PruneCruft]
diff --git a/lib/RDF/NS/URIS.pm b/lib/RDF/NS/URIS.pm
index 4e50a24..f34a2c4 100644
--- a/lib/RDF/NS/URIS.pm
+++ b/lib/RDF/NS/URIS.pm
@@ -15,7 +15,7 @@ sub GET {
 =head1 SYNOPSIS
 
   use RDF::NS::URIS;
-  use constant NS => RDF::NS::URIS->new('20120829');
+  use constant NS => RDF::NS::URIS->new('20120905');
 
   NS->foaf_Person;             # an URI object
   NS->uri('foaf:Person);       # same
@@ -24,7 +24,7 @@ sub GET {
 =head1 DESCRIPTION
 
 RDF::NS::URIS works like L<RDF::NS> but it returns instances of L<URI> instead
-of plain strings.
+of plain strings. You must have installed module L<URI> to use this package.
 
 =head1 SEE ALSO
 
diff --git a/t/uris.t b/t/uris.t
index 706d31f..c0bb5c1 100644
--- a/t/uris.t
+++ b/t/uris.t
@@ -2,17 +2,24 @@ use strict;
 use warnings;
 use Test::More;
 
-use RDF::NS::URIS;
-use constant NS => RDF::NS::URIS->new('20120829');
+BEGIN {
+    eval {
+        require RDF::NS::URIS;
+        require URI;
+        1;
+    } or do {
+        plan skip_all => "URI missing - skip tests of RDF::NS::URI";
+    }
+}
 
-use URI;
+my $NS = RDF::NS::URIS->new('20120829');
 
 my $foaf = 'http://xmlns.com/foaf/0.1/';
 my $person = $foaf."Person";
 
-is NS->foaf,               URI->new($foaf);
-is NS->foaf_Person,        URI->new($person);
-is NS->URI('foaf:Person'), URI->new($person);
-is NS->foaf_Person->as_string, $person;
+is $NS->foaf,               URI->new($foaf);
+is $NS->foaf_Person,        URI->new($person);
+is $NS->URI('foaf:Person'), URI->new($person);
+is $NS->foaf_Person->as_string, $person;
 
 done_testing;

-- 
librdf-ns-perl Debian packaging



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