Lines 2846-2852
subtest '_FixAccountForLostAndReturned returns undef if patron is deleted' => su
Link Here
|
2846 |
}; |
2846 |
}; |
2847 |
|
2847 |
|
2848 |
subtest 'Set waiting flag' => sub { |
2848 |
subtest 'Set waiting flag' => sub { |
2849 |
plan tests => 4; |
2849 |
plan tests => 9; |
2850 |
|
2850 |
|
2851 |
my $library_1 = $builder->build( { source => 'Branch' } ); |
2851 |
my $library_1 = $builder->build( { source => 'Branch' } ); |
2852 |
my $patron_1 = $builder->build( { source => 'Borrower', value => { branchcode => $library_1->{branchcode}, categorycode => $patron_category->{categorycode} } } ); |
2852 |
my $patron_1 = $builder->build( { source => 'Borrower', value => { branchcode => $library_1->{branchcode}, categorycode => $patron_category->{categorycode} } } ); |
Lines 2883-2888
subtest 'Set waiting flag' => sub {
Link Here
|
2883 |
is( $hold->found, 'W', 'Hold is waiting' ); |
2883 |
is( $hold->found, 'W', 'Hold is waiting' ); |
2884 |
( $status ) = CheckReserves($item->{itemnumber}); |
2884 |
( $status ) = CheckReserves($item->{itemnumber}); |
2885 |
is( $status, 'Waiting', 'Now the hold is waiting'); |
2885 |
is( $status, 'Waiting', 'Now the hold is waiting'); |
|
|
2886 |
|
2887 |
#Bug 21944 - Waiting transfer checked in at branch other than pickup location |
2888 |
set_userenv( $library_1 ); |
2889 |
(undef, my $messages, undef, undef ) = AddReturn ( $item->{barcode}, $library_1->{branchcode} ); |
2890 |
$hold = Koha::Holds->find( $reserve_id ); |
2891 |
is( $hold->found, undef, 'Hold is no longer marked waiting' ); |
2892 |
is( $hold->priority, 1, "Hold is now priority one again"); |
2893 |
is( $messages->{ResFound}->{ResFound}, "Reserved", "Hold is still returned"); |
2894 |
is( $messages->{ResFound}->{found}, undef, "Hold is no longer marked found in return message"); |
2895 |
is( $messages->{ResFound}->{priority}, 1, "Hold is priority 1 in return message"); |
2896 |
|
2886 |
}; |
2897 |
}; |
2887 |
|
2898 |
|
2888 |
subtest 'Cancel transfers on lost items' => sub { |
2899 |
subtest 'Cancel transfers on lost items' => sub { |
2889 |
- |
|
|