Lines 103-109
subtest 'AuthenticatePatron test' => sub {
Link Here
|
103 |
|
103 |
|
104 |
subtest 'GetPatronInfo/GetBorrowerAttributes test for extended patron attributes' => sub { |
104 |
subtest 'GetPatronInfo/GetBorrowerAttributes test for extended patron attributes' => sub { |
105 |
|
105 |
|
106 |
plan tests => 4; |
106 |
plan tests => 5; |
107 |
|
107 |
|
108 |
$schema->storage->txn_begin; |
108 |
$schema->storage->txn_begin; |
109 |
|
109 |
|
Lines 237-242
subtest 'GetPatronInfo/GetBorrowerAttributes test for extended patron attributes
Link Here
|
237 |
# Check results: |
237 |
# Check results: |
238 |
is_deeply( $reply->{'attributes'}, [ $cmp ], 'Test GetPatronInfo - show_attributes parameter' ); |
238 |
is_deeply( $reply->{'attributes'}, [ $cmp ], 'Test GetPatronInfo - show_attributes parameter' ); |
239 |
|
239 |
|
|
|
240 |
# BZ 21832 check is_expired exists |
241 |
ok( exists $reply->{is_expired}, 'There should be the is_expired information'); |
242 |
|
240 |
# Cleanup |
243 |
# Cleanup |
241 |
$schema->storage->txn_rollback; |
244 |
$schema->storage->txn_rollback; |
242 |
}; |
245 |
}; |
243 |
- |
|
|