From 5aa80408756c14565481259a927ab40488a4bd00 Mon Sep 17 00:00:00 2001
From: johnboy <chansey.killer@hotmail.com>
Date: Wed, 19 Jan 2011 10:44:11 +1300
Subject: [PATCH] Bug 5327 1 more test added.

Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
---
 t/Record.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/Record.t b/t/Record.t
index 7d71843c92..a0f210eb0c 100755
--- a/t/Record.t
+++ b/t/Record.t
@@ -6,7 +6,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 9;
+use Test::More tests => 10;
 use MARC::Record;
 
 BEGIN {
@@ -98,6 +98,9 @@ my $test5xml=qq(\@book{,
 
 is ($bibtex, $test5xml, "testing bibtex");
 
+my @entity=C4::Record::_entity_encode("BJ??RN");
+is ($entity[0], "BJ&#xC3;&#x96;RN", "Html umluts");
+
 
 
 
-- 
2.11.0