|
Lines 545-551
subtest 'update() tests' => sub {
Link Here
|
| 545 |
$schema->storage->txn_rollback; |
545 |
$schema->storage->txn_rollback; |
| 546 |
|
546 |
|
| 547 |
subtest 'librarian access tests' => sub { |
547 |
subtest 'librarian access tests' => sub { |
| 548 |
plan tests => 44; |
548 |
plan tests => 45; |
| 549 |
|
549 |
|
| 550 |
$schema->storage->txn_begin; |
550 |
$schema->storage->txn_begin; |
| 551 |
|
551 |
|
|
Lines 659-665
subtest 'update() tests' => sub {
Link Here
|
| 659 |
my $updated_on_got = delete $got->{updated_on}; |
659 |
my $updated_on_got = delete $got->{updated_on}; |
| 660 |
my $updated_on_expected = delete $newpatron->{updated_on}; |
660 |
my $updated_on_expected = delete $newpatron->{updated_on}; |
| 661 |
is_deeply($got, $newpatron, 'Returned patron from update matches expected'); |
661 |
is_deeply($got, $newpatron, 'Returned patron from update matches expected'); |
| 662 |
t::lib::Dates::compare( $updated_on_got, $updated_on_expected, 'updated_on values matched' ); |
662 |
is( t::lib::Dates::compare( $updated_on_got, $updated_on_expected ), 0, 'updated_on values matched' ); |
| 663 |
|
663 |
|
| 664 |
is(Koha::Patrons->find( $patron_2->id )->cardnumber, |
664 |
is(Koha::Patrons->find( $patron_2->id )->cardnumber, |
| 665 |
$newpatron->{ cardnumber }, 'Patron is really updated!'); |
665 |
$newpatron->{ cardnumber }, 'Patron is really updated!'); |
| 666 |
- |
|
|