From 867444c15e897450ccd97287a6ae20d64b18577f Mon Sep 17 00:00:00 2001
From: Alex Sassmannshausen <alex.sassmannshausen@ptfs-europe.com>
Date: Mon, 19 Sep 2016 13:40:46 +0200
Subject: [PATCH] Bug 5670: [QA Followup] Avoid CGI::param in list context.

* members/housebound.pl: Force `borrowernumber` to scalar context.

Signed-off-by: Claire Gravely <claire_gravely@hotmail.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
---
 members/housebound.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/members/housebound.pl b/members/housebound.pl
index a2d506250c..df7e05808b 100755
--- a/members/housebound.pl
+++ b/members/housebound.pl
@@ -55,7 +55,8 @@ my $visit_id = $input->param('visit_id') // q{};
 
 # Get patron
 my $patron = eval {
-    return Koha::Patrons->new->find($input->param('borrowernumber'));
+    my $borrowernumber = $input->param('borrowernumber') // q{};
+    return Koha::Patrons->new->find($borrowernumber);
 };
 push @messages, { type => 'error', code => 'error_on_patron_load' }
     if ( $@ or !$patron );
-- 
2.39.5