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

(-)a/t/db_dependent/Items.t (-5 / +4 lines)
Lines 146-152 subtest 'ModItemTransfer tests' => sub { Link Here
146
    );
146
    );
147
147
148
    ModItemTransfer( $item->itemnumber, $library1->{branchcode},
148
    ModItemTransfer( $item->itemnumber, $library1->{branchcode},
149
        $library2->{branchcode} );
149
        $library2->{branchcode}, 'Manual' );
150
150
151
    my $transfers = Koha::Item::Transfers->search(
151
    my $transfers = Koha::Item::Transfers->search(
152
        {
152
        {
Lines 159-165 subtest 'ModItemTransfer tests' => sub { Link Here
159
    is($item->holdingbranch, $library1->{branchcode}, "Items holding branch was updated to frombranch");
159
    is($item->holdingbranch, $library1->{branchcode}, "Items holding branch was updated to frombranch");
160
160
161
    ModItemTransfer( $item->itemnumber, $library2->{branchcode},
161
    ModItemTransfer( $item->itemnumber, $library2->{branchcode},
162
        $library1->{branchcode} );
162
        $library1->{branchcode}, 'Manual' );
163
    $transfers = Koha::Item::Transfers->search(
163
    $transfers = Koha::Item::Transfers->search(
164
        { itemnumber => $item->itemnumber, },
164
        { itemnumber => $item->itemnumber, },
165
        { order_by   => { '-asc' => 'branchtransfer_id' } }
165
        { order_by   => { '-asc' => 'branchtransfer_id' } }
Lines 168-175 subtest 'ModItemTransfer tests' => sub { Link Here
168
    is($transfers->count, 2, "Second transfer recorded on second call of ModItemTransfer");
168
    is($transfers->count, 2, "Second transfer recorded on second call of ModItemTransfer");
169
    my $transfer1 = $transfers->next;
169
    my $transfer1 = $transfers->next;
170
    my $transfer2 = $transfers->next;
170
    my $transfer2 = $transfers->next;
171
    isnt($transfer1->datearrived, undef, "First transfer marked as completed by ModItemTransfer");
171
    isnt($transfer1->datecancelled, undef, "First transfer marked as cancelled by ModItemTransfer");
172
    like($transfer1->comments,qr/^Canceled/, "First transfer contains 'Canceled' comment");
172
    like($transfer1->cancellation_reason,qr/^Manual/, "First transfer contains cancellation_reason 'Manual'");
173
    is($transfer2->datearrived, undef, "Second transfer is now the active transfer");
173
    is($transfer2->datearrived, undef, "Second transfer is now the active transfer");
174
    $item->discard_changes;
174
    $item->discard_changes;
175
    is($item->holdingbranch, $library2->{branchcode}, "Items holding branch was updated to frombranch");
175
    is($item->holdingbranch, $library2->{branchcode}, "Items holding branch was updated to frombranch");
176
- 

Return to bug 24446