Lines 6-12
use t::lib::Mocks;
Link Here
|
6 |
use C4::Context; |
6 |
use C4::Context; |
7 |
use C4::Branch; |
7 |
use C4::Branch; |
8 |
|
8 |
|
9 |
use Test::More tests => 38; |
9 |
use Test::More tests => 39; |
10 |
use MARC::Record; |
10 |
use MARC::Record; |
11 |
use C4::Biblio; |
11 |
use C4::Biblio; |
12 |
use C4::Items; |
12 |
use C4::Items; |
Lines 160-165
ok( $reserve->{'reserve_id'} eq $reserve2->{'reserve_id'}, "Test GetReserveInfo(
Link Here
|
160 |
|
160 |
|
161 |
$reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber, all_dates => 1 }); |
161 |
$reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber, all_dates => 1 }); |
162 |
$reserve = $reserves->[1]; |
162 |
$reserve = $reserves->[1]; |
|
|
163 |
ok( exists($reserve->{waitingdate}), 'GetReservesFromBiblionumber returns the waitingdate value' ); |
163 |
AlterPriority( 'top', $reserve->{'reserve_id'} ); |
164 |
AlterPriority( 'top', $reserve->{'reserve_id'} ); |
164 |
$reserve = GetReserve( $reserve->{'reserve_id'} ); |
165 |
$reserve = GetReserve( $reserve->{'reserve_id'} ); |
165 |
ok( $reserve->{'priority'} eq '1', "Test AlterPriority(), move to top" ); |
166 |
ok( $reserve->{'priority'} eq '1', "Test AlterPriority(), move to top" ); |
166 |
- |
|
|