Lines 24-29
use Test::Warn;
Link Here
|
24 |
|
24 |
|
25 |
use t::lib::TestBuilder; |
25 |
use t::lib::TestBuilder; |
26 |
use t::lib::Mocks; |
26 |
use t::lib::Mocks; |
|
|
27 |
use t::lib::Dates; |
27 |
|
28 |
|
28 |
use C4::Auth; |
29 |
use C4::Auth; |
29 |
use Koha::Database; |
30 |
use Koha::Database; |
Lines 534-540
subtest 'update() tests' => sub {
Link Here
|
534 |
$newpatron->{patron_id} = $unauthorized_patron->to_api->{patron_id}; |
535 |
$newpatron->{patron_id} = $unauthorized_patron->to_api->{patron_id}; |
535 |
$newpatron->{restricted} = $unauthorized_patron->to_api->{restricted}; |
536 |
$newpatron->{restricted} = $unauthorized_patron->to_api->{restricted}; |
536 |
$newpatron->{anonymized} = $unauthorized_patron->to_api->{anonymized}; |
537 |
$newpatron->{anonymized} = $unauthorized_patron->to_api->{anonymized}; |
537 |
is_deeply($result->tx->res->json, $newpatron, 'Returned patron from update matches expected'); |
538 |
|
|
|
539 |
my $got = $result->tx->res->json; |
540 |
my $updated_on_got = delete $got->{updated_on}; |
541 |
my $updated_on_expected = delete $newpatron->{updated_on}; |
542 |
is_deeply($got, $newpatron, 'Returned patron from update matches expected'); |
543 |
t::lib::Dates::compare( $updated_on_got, $updated_on_expected, 'updated_on values matched' ); |
544 |
|
538 |
|
545 |
|
539 |
is(Koha::Patrons->find( $patron_2->id )->cardnumber, |
546 |
is(Koha::Patrons->find( $patron_2->id )->cardnumber, |
540 |
$newpatron->{ cardnumber }, 'Patron is really updated!'); |
547 |
$newpatron->{ cardnumber }, 'Patron is really updated!'); |
541 |
- |
|
|