Bug 26987: (bug 23463 follow-up) Fix serial receipt if makePreviousSerialAvailable
authorJonathan Druart <jonathan.druart@bugs.koha-community.org>
Tue, 10 Nov 2020 13:11:10 +0000 (14:11 +0100)
committerJonathan Druart <jonathan.druart@bugs.koha-community.org>
Wed, 11 Nov 2020 15:09:58 +0000 (16:09 +0100)
$serialitem is not a Koha::Item there, we need to fetch the item before.

Test plan:
Turn makePreviousSerialAvailable on
Create a subscription
Receive an serial item, mark it "arrived"
Without this patch Koha explodes with
No property notforloan for Koha::Serial::Item at /usr/share/perl5/Exception/Class/Base.pm line 88
Koha::Object::set('Koha::Serial::Item=HASH(0x55dd67c75700)', 'HASH(0x55dd672cec30)') called at /kohadevbox/koha/serials/serials-edit.pl line 273

With this patch applied the notforloan and itype values are correctly
set for the new serial item.

Signed-off-by: Magnus Enger <magnus@libriotech.no>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
serials/serials-edit.pl

index afe9110..ad0deb5 100755 (executable)
@@ -267,7 +267,8 @@ if ( $op and $op eq 'serialchangestatus' ) {
                     my $subscriptioninfos = GetSubscription($subscriptionids[$i]);
 
                     # Changing the status to "available" and the itemtype according to the previousitemtype db field
-                    $serialitem->set(
+                    my $item = Koha::Items->find($itemnumber);
+                    $item->set(
                         {
                             notforloan => 0,
                             itype => $subscriptioninfos->{'previousitemtype'}