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

(-)a/t/db_dependent/Illrequests.t (-2 / +38 lines)
Lines 41-47 use Test::Exception; Link Here
41
use Test::Deep qw/ cmp_deeply ignore /;
41
use Test::Deep qw/ cmp_deeply ignore /;
42
use Test::Warn;
42
use Test::Warn;
43
43
44
use Test::More tests => 13;
44
use Test::More tests => 14;
45
45
46
my $schema = Koha::Database->new->schema;
46
my $schema = Koha::Database->new->schema;
47
my $builder = t::lib::TestBuilder->new;
47
my $builder = t::lib::TestBuilder->new;
Lines 1178-1183 subtest 'Checking out' => sub { Link Here
1178
    $schema->storage->txn_rollback;
1178
    $schema->storage->txn_rollback;
1179
};
1179
};
1180
1180
1181
subtest 'Checking out with custom due date' => sub {
1182
    plan tests => 1;
1183
    $schema->storage->txn_begin;
1184
1185
    my $library = $builder->build_object({ class => 'Koha::Libraries' });
1186
    my $patron = $builder->build_object({
1187
        class => 'Koha::Patrons',
1188
        value => { category_type => 'x' }
1189
    });
1190
    my $biblio = $builder->build_sample_biblio();
1191
    my $itemtype_loanable = $builder->build_object({
1192
        class => 'Koha::ItemTypes',
1193
        value => {
1194
            notforloan => 0
1195
        }
1196
    });
1197
    my $request = $builder->build_object({
1198
        class => 'Koha::Illrequests',
1199
        value => {
1200
            borrowernumber => $patron->borrowernumber,
1201
            biblio_id      => $biblio->biblionumber
1202
        }
1203
    });
1204
1205
    t::lib::Mocks::mock_userenv({ branchcode => $library->branchcode });
1206
    my $duedate = '2099-05-21 00:00:00';
1207
    my $form_stage_loanable = $request->check_out({
1208
        stage      => 'form',
1209
        item_type  => $itemtype_loanable->itemtype,
1210
        branchcode => $library->branchcode,
1211
        duedate    => $duedate
1212
    });
1213
    is($patron->checkouts->next->date_due, $duedate, "Custom due date was used");
1214
1215
    $schema->storage->txn_rollback;
1216
};
1217
1181
subtest 'Checking Limits' => sub {
1218
subtest 'Checking Limits' => sub {
1182
1219
1183
    plan tests => 30;
1220
    plan tests => 30;
1184
- 

Return to bug 30947