From dd55209f251dfbb34a6c95266ea6e0fd4d6580d8 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 1 Apr 2020 06:19:24 -0400 Subject: [PATCH] Bug 24537: Tidy code Signed-off-by: Kyle M Hall Signed-off-by: Martin Renvoize --- opac/ilsdi.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/opac/ilsdi.pl b/opac/ilsdi.pl index c9c01a9ce0..e1215cf75b 100755 --- a/opac/ilsdi.pl +++ b/opac/ilsdi.pl @@ -164,19 +164,19 @@ unless ( C4::Context->preference('ILS-DI') ) { } # If the remote address is not allowed, redirect to 403 -my @AuthorizedIPs = split(/,/, C4::Context->preference('ILS-DI:AuthorizedIPs')); -if ( @AuthorizedIPs ){ # If no filter set, allow access to everybody +my @AuthorizedIPs = split( /,/, C4::Context->preference('ILS-DI:AuthorizedIPs') ); +if (@AuthorizedIPs) { # If no filter set, allow access to everybody my $authorized = 0; - foreach my $ip (@AuthorizedIPs){ + foreach my $ip (@AuthorizedIPs) { my $netmask = Net::Netmask->new2($ip); - if ( $netmask && $netmask->match($ENV{'REMOTE_ADDR'}) ){ + if ( $netmask && $netmask->match( $ENV{REMOTE_ADDR} ) ) { $authorized = 1; last; } } - unless ($authorized){ + unless ($authorized) { $out->{'code'} = "NotAllowed"; - $out->{'message'} = "Unauthorized IP address: ".$ENV{'REMOTE_ADDR'}."."; + $out->{'message'} = "Unauthorized IP address: $ENV{REMOTE_ADDR}."; } } -- 2.39.5