Bugzilla – Attachment 48834 Details for
Bug 16010
merge_authorities migration script is broken
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 16010: follow-up of 15381 - FIX merge_authorities migration script
Bug-16010-follow-up-of-15381---FIX-mergeauthoritie.patch (text/plain), 1.72 KB, created by
Jonathan Druart
on 2016-03-09 08:25:07 UTC
(
hide
)
Description:
Bug 16010: follow-up of 15381 - FIX merge_authorities migration script
Filename:
MIME Type:
Creator:
Jonathan Druart
Created:
2016-03-09 08:25:07 UTC
Size:
1.72 KB
patch
obsolete
>From 112f6604faa0352355a31834ab65c76ccb22b6f1 Mon Sep 17 00:00:00 2001 >From: Jonathan Druart <jonathan.druart@bugs.koha-community.org> >Date: Wed, 9 Mar 2016 08:20:04 +0000 >Subject: [PATCH] Bug 16010: follow-up of 15381 - FIX merge_authorities > migration script > >Caused by commit 7e70202d34d75f988fbaea9b911347417c203aac > Bug 15381: Remove GetAuthType and GetAuthTypeCode > >If you execute perl misc/migration_tools/merge_authority.pl -f 1 -t 2 >you will get: >Can't locate object method "authtypecode" via package "1" (perhaps you forgot to load "1"?) > at misc/migration_tools/merge_authority.pl line 58. > >GetAuthority does not return a Koha::Authority but a MARC::Record: >there is no authtype code method! > >Test plan: >perl misc/migration_tools/merge_authority.pl -f X -t Y >Should not return any error. >Note that if the authid X or Y does not exist, the script will die. >--- > misc/migration_tools/merge_authority.pl | 7 +++++-- > 1 file changed, 5 insertions(+), 2 deletions(-) > >diff --git a/misc/migration_tools/merge_authority.pl b/misc/migration_tools/merge_authority.pl >index 87a02f9..405b66a 100755 >--- a/misc/migration_tools/merge_authority.pl >+++ b/misc/migration_tools/merge_authority.pl >@@ -55,8 +55,11 @@ $|=1; # flushes output > my $authfrom = GetAuthority($mergefrom); > my $authto = GetAuthority($mergeto); > >-my $authtypecodefrom = $mergefrom->authtypecode; >-my $authtypecodeto = $mergeto->authtypecode; >+die "Authority $mergefrom does not exist" unless $authfrom; >+die "Authority $mergeto does not exist" unless $authto; >+ >+my $authtypecodefrom = Koha::Authorities->find($mergefrom)->authtypecode; >+my $authtypecodeto = Koha::Authorities->find($mergeto)->authtypecode; > > unless ($noconfirm || $batch) { > print "************\n"; >-- >2.7.0
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 16010
:
48834
|
48922
|
49333