View | Details | Raw Unified | Return to bug 31201
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Pseudonymization.t (-17 / +19 lines)
Lines 132-159 subtest 'PseudonymizedBorrowerAttributes tests' => sub { Link Here
132
    delete $patron_info->{borrowernumber};
132
    delete $patron_info->{borrowernumber};
133
    $patron->delete;
133
    $patron->delete;
134
134
135
    my $attribute_type1 = Koha::Patron::Attribute::Type->new(
135
    my $attribute_type1 = $builder->build_object(
136
        {
136
        {
137
            code                => 'my code1',
137
            class => 'Koha::Patron::Attribute::Types',
138
            description         => 'my description1',
138
            value => {
139
            repeatable          => 1,
139
                repeatable                => 1,
140
            keep_for_pseudonymization => 1,
140
                keep_for_pseudonymization => 1,
141
            }
141
        }
142
        }
142
    )->store;
143
    );
143
    my $attribute_type2 = Koha::Patron::Attribute::Type->new(
144
    my $attribute_type2 = $builder->build_object(
144
        {
145
        {
145
            code                => 'my code2',
146
            class => 'Koha::Patron::Attribute::Types',
146
            description         => 'my description2',
147
            value => {
147
            keep_for_pseudonymization => 0,
148
                keep_for_pseudonymization => 0,
149
            }
148
        }
150
        }
149
    )->store;
151
    );
150
    my $attribute_type3 = Koha::Patron::Attribute::Type->new(
152
    my $attribute_type3 = $builder->build_object(
151
        {
153
        {
152
            code                => 'my code3',
154
            class => 'Koha::Patron::Attribute::Types',
153
            description         => 'my description3',
155
            value => {
154
            keep_for_pseudonymization => 1,
156
                keep_for_pseudonymization => 1,
157
            }
155
        }
158
        }
156
    )->store;
159
    );
157
160
158
    $patron = Koha::Patron->new($patron_info)->store->get_from_storage;
161
    $patron = Koha::Patron->new($patron_info)->store->get_from_storage;
159
    my $attribute_values = [
162
    my $attribute_values = [
160
- 

Return to bug 31201