|
Lines 17-23
Link Here
|
| 17 |
|
17 |
|
| 18 |
use Modern::Perl; |
18 |
use Modern::Perl; |
| 19 |
|
19 |
|
| 20 |
use Test::More tests => 70; |
20 |
use Test::More tests => 71; |
| 21 |
use Test::NoWarnings; |
21 |
use Test::NoWarnings; |
| 22 |
use Test::MockModule; |
22 |
use Test::MockModule; |
| 23 |
use Test::Warn; |
23 |
use Test::Warn; |
|
Lines 1581-1586
subtest 'AddReserve() tests' => sub {
Link Here
|
| 1581 |
$schema->storage->txn_rollback; |
1581 |
$schema->storage->txn_rollback; |
| 1582 |
}; |
1582 |
}; |
| 1583 |
|
1583 |
|
|
|
1584 |
subtest 'ModReserve() tests' => sub { |
| 1585 |
|
| 1586 |
plan tests => 1; |
| 1587 |
|
| 1588 |
$schema->storage->txn_begin; |
| 1589 |
|
| 1590 |
my $library = $builder->build_object( { class => 'Koha::Libraries' } ); |
| 1591 |
my $patron = $builder->build_object( { class => 'Koha::Patrons', value => { lastseen => undef } } ); |
| 1592 |
my $biblio = $builder->build_sample_biblio; |
| 1593 |
|
| 1594 |
my $reserve_id = AddReserve( |
| 1595 |
{ |
| 1596 |
branchcode => $library->branchcode, |
| 1597 |
borrowernumber => $patron->id, |
| 1598 |
biblionumber => $biblio->id, |
| 1599 |
} |
| 1600 |
); |
| 1601 |
|
| 1602 |
my $hold = Koha::Holds->find($reserve_id); |
| 1603 |
|
| 1604 |
ModReserve( |
| 1605 |
{ |
| 1606 |
branchcode => $reserve_id, |
| 1607 |
expiration_date => '2040-04-02', |
| 1608 |
} |
| 1609 |
); |
| 1610 |
|
| 1611 |
$hold = Koha::Holds->find($reserve_id); |
| 1612 |
is( $hold->expirationdate, '2040-04-02', 'Successfully updated expiration date' ); |
| 1613 |
|
| 1614 |
ModReserve( |
| 1615 |
{ |
| 1616 |
branchcode => $reserve_id, |
| 1617 |
patron_expiration_date => '2040-04-02' |
| 1618 |
} |
| 1619 |
); |
| 1620 |
|
| 1621 |
$hold = Koha::Holds->find($reserve_id); |
| 1622 |
is( $hold->patron_expiration_date, '2040-04-02', 'Successfully updated patron expiration date' ); |
| 1623 |
|
| 1624 |
$schema->storage->txn_rollback; |
| 1625 |
}; |
| 1626 |
|
| 1584 |
subtest 'AlterPriorty() tests' => sub { |
1627 |
subtest 'AlterPriorty() tests' => sub { |
| 1585 |
|
1628 |
|
| 1586 |
plan tests => 2; |
1629 |
plan tests => 2; |
| 1587 |
- |
|
|