Bugzilla – Attachment 7415 Details for
Bug 5657
biblio records update fails when updating multiple authorities linked with the same biblio
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
A refreshed version of the patch
0001-Changes-made-to-sub-merge-to-eliminate-errors-occuri.patch (text/plain), 1.72 KB, created by
Janusz Kaczmarek
on 2012-02-01 18:06:29 UTC
(
hide
)
Description:
A refreshed version of the patch
Filename:
MIME Type:
Creator:
Janusz Kaczmarek
Created:
2012-02-01 18:06:29 UTC
Size:
1.72 KB
patch
obsolete
>From 80833c1bb5d4c898e4c51416c7356f853cc6e2c5 Mon Sep 17 00:00:00 2001 >From: Janusz Kaczmarek <januszop@gmail.com> >Date: Tue, 25 Jan 2011 18:10:00 +0100 >Subject: [PATCH] Bug 5657: Changes made to sub merge to eliminate errors occuring when updating bibio records in batch (after updating multiple authority records) >Content-Type: text/plain; charset="utf-8" > >--- > C4/AuthoritiesMarc.pm | 7 +++++-- > 1 files changed, 5 insertions(+), 2 deletions(-) > >diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm >index b3c5070..b0f90da 100644 >--- a/C4/AuthoritiesMarc.pm >+++ b/C4/AuthoritiesMarc.pm >@@ -1331,7 +1331,11 @@ sub merge { > my $rec; > $rec=$oResult->record($z); > my $marcdata = $rec->raw(); >- push @reccache, $marcdata; >+ my $marcrecordzebra= MARC::Record->new_from_xml($marcdata,"utf8",C4::Context->preference("marcflavour")); >+ my ( $biblionumbertagfield, $biblionumbertagsubfield ) = &GetMarcFromKohaField( "biblio.biblionumber", '' ); >+ my $i = $marcrecordzebra->subfield($biblionumbertagfield, $biblionumbertagsubfield); >+ my $marcrecorddb=GetMarcBiblio($i); >+ push @reccache, $marcrecorddb; > $z++; > } > $oResult->destroy(); >@@ -1357,7 +1361,6 @@ sub merge { > # May be used as a template for a bulkedit field > foreach my $marcrecord(@reccache){ > my $update; >- $marcrecord= MARC::Record->new_from_xml($marcrecord,"utf8",C4::Context->preference("marcflavour")) unless(C4::Context->preference('NoZebra')); > foreach my $tagfield (@tags_using_authtype){ > # warn "tagfield : $tagfield "; > foreach my $field ($marcrecord->field($tagfield)){ >-- >1.7.2.5 >
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 5657
:
3022
|
7415
|
8145