From c3c75f7199212425de1991e939c67f3c94cd86cb Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 24 Jan 2024 16:25:30 +0100 Subject: [PATCH] Bug 35890: Reject login if IP is not valid --- C4/Auth.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/C4/Auth.pm b/C4/Auth.pm index 207f9328bbf..9b27d8603a1 100644 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -1194,6 +1194,7 @@ sub checkauth { my $branches = { map { $_->branchcode => $_->unblessed } Koha::Libraries->search->as_list }; if ( $type ne 'opac' and C4::Context->preference('AutoLocation') ) { + $auth_state = "failed"; # we have to check they are coming from the right ip range my $domain = $branches->{$branchcode}->{'branchip'}; $domain =~ s|\.\*||g; -- 2.34.1