gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 38528: (QA follow-up) Add tests for set_additional_fields with marcfield_mode = 'get' 

Signed-off-by: Pedro Amorim <pedro.amorim@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit 05ea8ec61c)
Signed-off-by: Baptiste Wojtkowski <baptiste.wojtkowski@biblibre.com>
This commit is contained in:
Pedro Amorim 2025-01-24 15:58:43 +00:00 committed by Baptiste Wojtkowski
parent 615f306793
commit 1126f6f0f3
No known key found for this signature in database
GPG Key ID: 47A8A13E10BC0D40
1 changed files with 25 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
t/db_dependent/Koha/Object/Mixin/AdditionalFields.t
View File

@ -16,7 +16,7 @@ my $builder = t::lib::TestBuilder->new;
my $schema = Koha::Database->schema;
subtest 'set_additional_fields with marcfield_mode = "get"' => sub {
plan tests => 1;
plan tests => 2;
$schema->txn_begin;
@ -53,6 +53,30 @@ subtest 'set_additional_fields with marcfield_mode = "get"' => sub {
is($values->[0]->value, 'some value', 'value was copied from the biblio record to the field');
$field->delete;
my $get_marcfield_field = Koha::AdditionalField->new(
{
tablename => 'subscription',
name => random_string( 'c' x 100 ),
marcfield => '998$Z',
marcfield_mode => 'get',
}
);
$get_marcfield_field->store()->discard_changes();
my $q = CGI->new;
$q->param(
-name => 'additional_field_' . $get_marcfield_field->id,
-value => '',
);
my @additional_fields =
Koha::Object::Mixin::AdditionalFields->prepare_cgi_additional_field_values( $q, 'subscription' );
$subscription->set_additional_fields( \@additional_fields );
$values = $subscription->additional_field_values()->as_list();
is( $values->[0]->value, 'some value', 'value was copied from the biblio record to the field' );
$schema->txn_rollback;
};