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

(-)a/C4/Items.pm (+1 lines)
Lines 2135-2140 sub _set_defaults_for_add { Link Here
2135
    my $item = shift;
2135
    my $item = shift;
2136
    $item->{dateaccessioned} ||= C4::Dates->new->output('iso');
2136
    $item->{dateaccessioned} ||= C4::Dates->new->output('iso');
2137
    $item->{$_} ||= 0 for (qw( notforloan damaged itemlost withdrawn));
2137
    $item->{$_} ||= 0 for (qw( notforloan damaged itemlost withdrawn));
2138
    $item->{permanent_location} = $item->{location} unless ($item->{permanent_location});
2138
}
2139
}
2139
2140
2140
=head2 _koha_new_item
2141
=head2 _koha_new_item
(-)a/t/db_dependent/Circulation.t (-2 / +1 lines)
Lines 645-651 sub testReturnToShelvingCart { Link Here
645
        $item->{biblionumber}
645
        $item->{biblionumber}
646
    );
646
    );
647
    my $addedItem = C4::Items::GetItem($addedItemnumber);
647
    my $addedItem = C4::Items::GetItem($addedItemnumber);
648
    ok($item->{permanent_location} eq $yetAnotherLocation && $item->{location} eq $yetAnotherLocation, "ReturnToShelvingCart: Adding a new Item with location also sets the permanent_location.");
648
    ok($addedItem->{permanent_location} eq $yetAnotherLocation && $addedItem->{location} eq $yetAnotherLocation, "ReturnToShelvingCart: Adding a new Item with location also sets the permanent_location.");
649
649
650
    C4::Context->set_preference('ReturnToShelvingCart', $originalReturnToShelvingCart) unless $originalReturnToShelvingCart; #Set it to the original value
650
    C4::Context->set_preference('ReturnToShelvingCart', $originalReturnToShelvingCart) unless $originalReturnToShelvingCart; #Set it to the original value
651
}
651
}
652
- 

Return to bug 13540