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

(-)a/t/db_dependent/api/v1/patrons_accounts.t (-7 / +15 lines)
Lines 184-190 subtest 'get_balance() tests' => sub { Link Here
184
184
185
subtest 'add_credit() tests' => sub {
185
subtest 'add_credit() tests' => sub {
186
186
187
    plan tests => 18;
187
    plan tests => 19;
188
188
189
    $schema->storage->txn_begin;
189
    $schema->storage->txn_begin;
190
190
Lines 209-217 subtest 'add_credit() tests' => sub { Link Here
209
209
210
    my $credit = { amount => 100 };
210
    my $credit = { amount => 100 };
211
211
212
    my $ret = $t->post_ok(
212
    my $ret =
213
        "//$userid:$password@/api/v1/patrons/$patron_id/account/credits" =>
213
        $t->post_ok( "//$userid:$password@/api/v1/patrons/$patron_id/account/credits" => json => $credit )
214
          json => $credit )->status_is(201)->tx->res->json;
214
        ->status_is(201)
215
        ->header_is(
216
        'Location' => "/api/v1/patrons/$patron_id/account/credits/" . $t->tx->res->json->{account_line_id},
217
        "REST3.4.1"
218
        )->tx->res->json;
215
219
216
    is_deeply(
220
    is_deeply(
217
        $ret,
221
        $ret,
Lines 472-478 subtest 'list_debits() test' => sub { Link Here
472
476
473
subtest 'add_debit() tests' => sub {
477
subtest 'add_debit() tests' => sub {
474
478
475
    plan tests => 20;
479
    plan tests => 21;
476
480
477
    $schema->storage->txn_begin;
481
    $schema->storage->txn_begin;
478
482
Lines 546-552 subtest 'add_debit() tests' => sub { Link Here
546
550
547
    my $account_line_id = $ret->{account_line_id};
551
    my $account_line_id = $ret->{account_line_id};
548
552
549
    $t->post_ok( "//$userid:$password@/api/v1/patrons/$patron_id/account/debits" => json => $debit )->status_is(201);
553
    $t->post_ok( "//$userid:$password@/api/v1/patrons/$patron_id/account/debits" => json => $debit )
554
        ->status_is(201)
555
        ->header_is(
556
        'Location' => "/api/v1/patrons/$patron_id/account/debits/" . $t->tx->res->json->{account_line_id},
557
        "REST3.4.1"
558
        );
550
559
551
    is(
560
    is(
552
        $account->outstanding_debits->total_outstanding,
561
        $account->outstanding_debits->total_outstanding,
553
- 

Return to bug 38932