From 6389e73ad8fc7dd9e9206a3129c77f56645ad544 Mon Sep 17 00:00:00 2001 From: Katrin Fischer Date: Fri, 28 Jul 2023 12:02:35 +0000 Subject: [PATCH] Bug 32748: (follow-up) Fix perlcritic error --- C4/Koha.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/C4/Koha.pm b/C4/Koha.pm index 8e2f359058..9049c4e9de 100644 --- a/C4/Koha.pm +++ b/C4/Koha.pm @@ -487,7 +487,8 @@ sub GetAuthorisedValues { my $category = shift // ''; # optional parameter my $opac = shift ? 1 : 0; # normalise to be safe my $options = shift // ''; - my $no_limit = $options->{'no_limit'} if $options; #optional parameter to ignore library limitation + my $no_limit; + if ($options) { $no_limit = $options->{'no_limit'}; } #optional parameter to ignore library limitation # Is this cached already? my $branch_limit = -- 2.30.2