From 24c56197953896524f24b95aa50a4b35569438cf Mon Sep 17 00:00:00 2001 From: Colin Campbell Date: Tue, 15 Oct 2013 15:09:08 +0100 Subject: [PATCH] [PASSED QA] 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 Works well. No koha-qa errors. Same test as before 1) with a record with diacritics in author/title, 2) press new child record, on new record 773adt with mangled accents 3) Apply patch 4) Repeat 2, now good results Signed-off-by: Katrin Fischer Passes all tests and QA script. Tested with a record containing umlauts in the title, $t was empty before and umlauts in $a mangled. After applying the patch fields are correctly filled and diacritics display correctly. --- cataloguing/addbiblio.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index bfb62f0..5069af9 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(); + SetMarcUnicodeFlag($record, $marcflavour); my $hostfield = prepare_host_field($parentbiblio,$marcflavour); if ($hostfield) { $record->append_fields($hostfield); -- 1.7.9.5