From fc82d0edf9e43584b347e8bbd855a0f6fde8605f Mon Sep 17 00:00:00 2001 From: Pedro Amorim Date: Thu, 19 Oct 2023 10:42:48 +0000 Subject: [PATCH] Bug 35105: Fix patron accessor in Illrequest.pm Patron is nullable, so we need to consider undef return Test plan, k-t-d: 1) Install FreeForm and enable ILLmodule, run: bash <(curl -s https://raw.githubusercontent.com/ammopt/koha-ill-dev/master/start-ill-dev.sh) 2) Visit /cgi-bin/koha/ill/ill-requests.pl 3) Create 'New ILL request' 4) Select the request type, input cardnumber '42' and select a library 5) Hit 'Create' 6) Manage the request created just now: click the request id or 'manage request' button from the table 7) Click "Edit request" from the top actions toolbar 8a) Input text in Patron ID e.g. 'asdasdasf'. Notice you get redirected to the table - now renders correctly. 8b) Input a patron id that doesn't exist e.g. '987654'. Notice you get an error upon saving "FK Constraint error", go back to the table and verify it renders correctly. In both instances, the request is saved with borrowernumber as NULL, this was preventing the table from rendering because the 'patron' API embed was trying to retrieve a patron - getting an empty resultset instead of undef. --- Koha/Illrequest.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/Koha/Illrequest.pm b/Koha/Illrequest.pm index aa5e16b8ba..831d6fa52d 100644 --- a/Koha/Illrequest.pm +++ b/Koha/Illrequest.pm @@ -242,14 +242,17 @@ sub logs { my $patron = $request->patron; -Returns the linked I object. +For a given request, return the linked I object +associated with it, or undef if none exists =cut sub patron { my ( $self ) = @_; - return Koha::Patron->_new_from_dbic( scalar $self->_result->patron ); + my $patron_rs = $self->_result->patron; + return unless $patron_rs; + return Koha::Patron->_new_from_dbic($patron_rs); } =head3 library -- 2.30.2