Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 31201: Prevent Pseudonymization.t to fail

Browse source 
It's failing if selenium/patrons_search.t failed before, they are using
the same code and the selenium tests didn't clean correctly

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Jonathan Druart 2022-07-20 17:44:05 +02:00 committed by Tomas Cohen Arazi
parent d7647052f2
commit ed83d77445
Signed by: tomascohen
GPG key ID: 0A272EA1B2F3C15F
1 changed files with 22 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

39
t/db_dependent/Koha/Pseudonymization.t
View file

@ -132,28 +132,31 @@ subtest 'PseudonymizedBorrowerAttributes tests' => sub {
delete $patron_info->{borrowernumber};
$patron->delete;
my $attribute_type1 = Koha::Patron::Attribute::Type->new(
my $attribute_type1 = $builder->build_object(
{
code => 'my code1',
description => 'my description1',
repeatable => 1,
keep_for_pseudonymization => 1,
class => 'Koha::Patron::Attribute::Types',
value => {
repeatable => 1,
keep_for_pseudonymization => 1,
}
}
)->store;
my $attribute_type2 = Koha::Patron::Attribute::Type->new(
);
my $attribute_type2 = $builder->build_object(
{
code => 'my code2',
description => 'my description2',
keep_for_pseudonymization => 0,
class => 'Koha::Patron::Attribute::Types',
value => {
keep_for_pseudonymization => 0,
}
}
)->store;
my $attribute_type3 = Koha::Patron::Attribute::Type->new(
);
my $attribute_type3 = $builder->build_object(
{
code => 'my code3',
description => 'my description3',
keep_for_pseudonymization => 1,
class => 'Koha::Patron::Attribute::Types',
value => {
keep_for_pseudonymization => 1,
}
}
)->store;
);
$patron = Koha::Patron->new($patron_info)->store->get_from_storage;
my $attribute_values = [
@ -190,7 +193,9 @@ subtest 'PseudonymizedBorrowerAttributes tests' => sub {
);
my $p = Koha::PseudonymizedTransactions->search({itemnumber => $item->itemnumber})->next;
my $attributes = Koha::Database->new->schema->resultset('PseudonymizedBorrowerAttribute')->search({transaction_id => $p->id });
my $attributes =
Koha::Database->new->schema->resultset('PseudonymizedBorrowerAttribute')
->search( { transaction_id => $p->id }, { order_by => 'attribute' } );
is( $attributes->count, 2,
'Only the 2 attributes that have a type with keep_for_pseudonymization set should be kept'
);