[libatteanx-compatilibity-trine-perl] 12/22: roundtripping on literals

[Jonas Smedegaard]

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

js pushed a commit to annotated tag debian/0.001-1
in repository libatteanx-compatilibity-trine-perl.

commit 5ae6be2a3722da18deaa37d2a802089afe68a388
Author: Kjetil Kjernsmo <kjetil at kjernsmo.net>
Date:   Mon Aug 14 23:31:51 2017 +0200

    roundtripping on literals
---
 t/literal.t | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/t/literal.t b/t/literal.t
index 6162512..a0bea55 100644
--- a/t/literal.t
+++ b/t/literal.t
@@ -12,4 +12,11 @@ can_ok('Attean::Literal', 'literal_value_language');
 can_ok('Attean::Literal', 'has_datatype');
 can_ok('Attean::Literal', 'literal_datatype');
 
+my $lit = Attean::Literal->new(value => 'Dahut', language => 'fr');
+
+ok($lit->has_datatype, 'All have datatype in RDF 1.1');
+is($lit->literal_value, 'Dahut', 'Value roundtripped');
+is($lit->literal_value_language, 'fr', 'Language roundtripped');
+is($lit->literal_datatype, 'http://www.w3.org/2001/XMLSchema#langString', 'Got langString data type');
+
 done_testing;

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