Attachment 69349 Details for Bug 19693 – Bug 19693: authtypefrom incorrectly set when updating auth from file

[patch] Bug 19693: authtypefrom incorrectly set when updating auth from file

0001-Bug-19693-authtypefrom-incorrectly-set-when-updating.patch (text/plain), 2.77 KB, created by Janusz Kaczmarek on 2017-11-26 17:21:41 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Janusz Kaczmarek

Created: 2017-11-26 17:21:41 UTC

Size: 2.77 KB

patch

obsolete

>From 60b31954cb84fd95349e8fdcd0c8fd1d0abc9898 Mon Sep 17 00:00:00 2001
>From: Janusz Kaczmarek <januszop@gmail.com>
>Date: Sat, 25 Nov 2017 00:25:46 +0100
>Subject: [PATCH] Bug 19693: authtypefrom incorrectly set when updating auth
> from file
>
>In those cases when authorities are updated by an external agency (or
>even internally, by reviewing and correcting an exported authority file)
>when the heading tag will be changed (seems odd but happens:
>
>111 Congress ==> 110 Corporate body.Congress ;
>100 Person ==> 110 Corporate body (a company named with person's name ;
>151 City--object ==> 150 Object (city) etc.)
>
>and then the authority record in Koha database will be updated with
>bulkmarcimport or by calling directly ModAuthority from a custom script,
>the merge function "doesn't know" that the change to the authority type
>has been made and, consequently, doesn't adequately change the tag in
>related fields in biblio records (as it would if two different records
>with different authtypecode were merged with Koha interface).
>
>This is because at the moment when merge function is being called
>by ModAuthority
>Koha::Authority::Types->find($autfrom->authtypecode)
>Koha::Authority::Types->find($authto->authtypecode)
>both have the same value (because $autfrom == $autfrom).
>
>Therefore the authtype guessed from the old version of the record should
>be considered.
>
>To test:
>1) have an authority record used in biblio;
>   export it to file;
>   change 1XX heading tag to different (but reasonable) value
>   and possibly change also the content of the heading
>   (one can delete also 942 but it doesn't matter);
>   make bulkmarcimport.pl -a -update -file <modified_auth_file> and
>   see that the tag in biblio record has not been changed (whereas
>   the type of authority record did change);
>
>2) make orders in database (so that the authority type and the tag of
>the field in biblio record correspond); apply the patch;
>
>3) repeat the test from 1).
>---
> C4/AuthoritiesMarc.pm | 3 +++
> 1 file changed, 3 insertions(+)
>
>diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
>index 6dbe516208..56cdb8eeb1 100644
>--- a/C4/AuthoritiesMarc.pm
>+++ b/C4/AuthoritiesMarc.pm
>@@ -1406,6 +1406,9 @@ sub merge {
>     my $authfrom = Koha::Authorities->find($mergefrom);
>     my $authto = Koha::Authorities->find($mergeto);
>     my $authtypefrom = $authfrom ? Koha::Authority::Types->find($authfrom->authtypecode) : undef;
>+    if ($mergefrom == $mergeto && $authtypefrom ne GuessAuthTypeCode($MARCfrom)) {
>+        $authtypefrom = GuessAuthTypeCode($MARCfrom);
>+    }
>     my $authtypeto   = $authto ? Koha::Authority::Types->find($authto->authtypecode) : undef;
>     my $auth_tag_to_report_from = $authtypefrom ? $authtypefrom->auth_tag_to_report : '';
>     my $auth_tag_to_report_to   = $authtypeto ? $authtypeto->auth_tag_to_report : '';
>-- 
>2.11.0
>

Actions: View | Diff | Splinter Review

Attachments on bug 19693: 69344 | 69349 | 69350 | 138121 | 138122 | 140915 | 140916 | 141480 | 141481 | 141482