From 01e02364c905048908391615828f5878c2c5aac9 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Wed, 23 Aug 2017 11:42:34 -0300
Subject: [PATCH] Bug 19080: Fix perlcritic in routing-lists.pl

Signed-off-by: Julian Maurice <julian.maurice@biblibre.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 members/routing-lists.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/members/routing-lists.pl b/members/routing-lists.pl
index 5726a20ea3..b03be94749 100755
--- a/members/routing-lists.pl
+++ b/members/routing-lists.pl
@@ -48,7 +48,8 @@ my $borrowernumber = $query->param('borrowernumber');
 
 my $branch = C4::Context->userenv->{'branch'};
 
-my $patron = Koha::Patrons->find( $borrowernumber ) if $borrowernumber;
+my $patron;
+$patron = Koha::Patrons->find( $borrowernumber ) if $borrowernumber;
 unless ( $patron ) {
     print $query->redirect("/cgi-bin/koha/circ/circulation.pl?borrowernumber=$borrowernumber");
     exit;
-- 
2.39.5