subtest 'GetPatronInfo/GetBorrowerAttributes test for extended patron attributes' => sub {
plan tests => 4;
plan tests => 5;
$schema->storage->txn_begin;
# Check results:
is_deeply( $reply->{'attributes'}, [ $cmp ], 'Test GetPatronInfo - show_attributes parameter' );
ok( exists $reply->{is_expired}, 'There should be the is_expired information');
# Cleanup
$schema->storage->txn_rollback;
};
-