From 3c07687095f05994f5c82b8f320dfbb50f9b670f Mon Sep 17 00:00:00 2001 From: Colin Campbell Date: Tue, 15 Oct 2013 15:09:08 +0100 Subject: [PATCH] [SIGNED-OFF] Bug 11054: Specify utf8 encoding when creating a child record When the only non-ascii characters in a new child record are latin + diacritic in the range covered by Latin-1 they are not being added to a new child record correctly encoded. Explicitly setting the record's encodiing ensures that they are interpreted correctly. see "Unicode Bug" in perldoc perlunicode for background on why these characters are special Signed-off-by: Bernardo Gonzalez Kriegel Work as described. No koha-qa errors Test search for a record with diacritics on author or title press New Child Record without patch, 773's with mangled chars with patch, all fine This has nothing to do with major problems of encoding, here we create a new record and as CPAN page states, default encoding is MARC-8, so it's the right solution. --- cataloguing/addbiblio.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index cb40396..841c6c1 100755 --- a/cataloguing/addbiblio.pl +++ b/cataloguing/addbiblio.pl @@ -821,6 +821,7 @@ if ($hostbiblionumber) { if ($parentbiblio) { my $marcflavour = C4::Context->preference('marcflavour'); $record = MARC::Record->new(); + $record->encoding( 'UTF-8' ); my $hostfield = prepare_host_field($parentbiblio,$marcflavour); if ($hostfield) { $record->append_fields($hostfield); -- 1.7.9.5