From 6ba4b987a6fe8cc8773fb07d0c92a34f0f2db5cb Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 23 Aug 2017 11:42:34 -0300 Subject: [PATCH] Bug 19080: Fix perlcritic in routing-lists.pl Signed-off-by: Julian Maurice --- 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.11.0