From 29354389f49ce4a0e5ea2bc39d0dfbfc18d3c1df Mon Sep 17 00:00:00 2001 From: iliajie Date: Mon, 26 Dec 2022 12:51:10 +0200 Subject: [PATCH] Fix to test if anonymous user actually exists --- acl/acl-lib.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/acl/acl-lib.pl b/acl/acl-lib.pl index 1fca31105..4992dafee 100755 --- a/acl/acl-lib.pl +++ b/acl/acl-lib.pl @@ -1959,8 +1959,8 @@ my $miniserv = { }; my @anon = split(/\s+/, $miniserv->{'anonymous'} || ""); my ($user, $found) = &get_anonymous_access($path, $miniserv); return 1 if ($found >= 0); # Already setup - -if (!$user) { +my $auser = grep { $_->{'name'} eq $user } &list_users(); +if (!$auser) { # Create a user if need be $user = "anonymous"; my $uinfo = { 'name' => $user,