Bug 33270: (QA follow-up) Do not change param hashref

Might just be a theoretical thing now, but safer to clone.

Test plan:
Run t/db_dependent/Koha/Biblio/Metadata.t

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit cfbe8daf21)
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Marcel de Rooy 2023-07-17 10:59:26 +00:00 committed by Martin Renvoize
parent 1d11b4360a
commit 32db2823b8
No known key found for this signature in database
GPG Key ID: 422B469130441A0F
1 changed files with 2 additions and 2 deletions

View File

@ -149,6 +149,7 @@ Will return undef if the record cannot be built
sub record_strip_nonxml {
my ( $self, $params ) = @_;
$params //= {};
my $record;
my $marcxml_error;
@ -166,8 +167,7 @@ sub record_strip_nonxml {
return;
}
$params->{record} = $record;
return $self->record($params);
return $self->record( { %$params, record => $record } );
}
=head2 Internal methods