[libattean-perl] 07/42: Allow UUIDs to have lowercase hex digits (#102).

[Jonas Smedegaard]

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

js pushed a commit to annotated tag debian/0.019-1
in repository libattean-perl.

commit d19e4200d22e347e2410dfe21de72af3660a2a0f
Author: Gregory Todd Williams <greg at evilfunhouse.com>
Date:   Thu Jul 28 08:36:25 2016 -0700

    Allow UUIDs to have lowercase hex digits (#102).
---
 t/term-map.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/term-map.t b/t/term-map.t
index a2f98dd..63b858a 100644
--- a/t/term-map.t
+++ b/t/term-map.t
@@ -44,7 +44,7 @@ subtest 'short blank node label mapping' => sub {
 subtest 'UUID blank node label mapping' => sub {
 	my $mapper			= Attean::TermMap->uuid_blank_map;
 	my $bindings_mapper	= $mapper->binding_mapper;
-	my $uuid_blank		= qr/^_:0x[0-9A-Z]{32}$/;
+	my $uuid_blank		= qr/^_:0x[0-9A-Za-z]{32}$/;
 	{
 		note('Mapping Iterator<Term>');
 		my $iter	= Attean::ListIterator->new(values => [blank('a'), blank('zzz')], item_type => 'Attean::API::Term');

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