Bug 33205: (bug 28268 follow-up) Method call $row->authid inside quotes - produces...
authorJanusz Kaczmarek <januszop@gmail.com>
Sat, 11 Mar 2023 10:45:32 +0000 (11:45 +0100)
committerFridolin Somers <fridolin.somers@biblibre.com>
Thu, 23 May 2024 12:58:00 +0000 (14:58 +0200)
commitfb3473dfe3abe71b9545f19035d47e84f59c69d6
tree22416126515a55164835e72a60f8f28082094dab
parent7c4ea8ee7f6e214c7c22da4ab1a1c84e6b73e4ba
Bug 33205: (bug 28268 follow-up) Method call $row->authid inside quotes - produces meaningless warning

Bug 28268, in
Koha::MetadataRecord::Authority::get_all_authorities_iterator,
introduced a warning:

warn "Something went wrong reading record for authority $row->authid: $@\n";

But a method cannot be called from within quotes in Perl - extrapolation
does not work for functions/methods.  So, if something really goes
wrong, this line of code produces a warning like:

Something went wrong reading record for authority
Koha::Schema::Result::AuthHeader=HASH(0x55cf7e0d0958)->authid: Empty
String at /usr/share/perl5/MARC/File/XML.pm line 450.

which is not very informative -- authid is missing.

Test plan
=========
Hard to reproduce.  This problem occurs only in rare cases of some weird problem
in stores authority data or if a auth record had been deleted after a ES reindex
action has been initiated.  But the problem in the code and the fix seem obvious.

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit 9c2510ea2ef1db46bf42cf948b6c599250d6dd9e)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
Koha/MetadataRecord/Authority.pm