X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/ddedcbbdec61fb2d5feb6eb587c7fa938e346e7119cea0fe1ea565aa455ed983..9a3817961a2ce50f05a19d3e5007a930fed096b82cc16404afa3a6a1bdee5f6f:/gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 6f5ee84..d188faf 100755
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -3072,6 +3072,8 @@ sub git_get_projects_list {
 				return if (m!^[/.]$!);
 				# only directories can be git repositories
 				return unless (-d $_);
+				# need search permission
+				return unless (-x $_);
 				# don't traverse too deep (Find is super slow on os x)
 				# $project_maxdepth excludes depth of $projectroot
 				if (($File::Find::name =~ tr!/!!) - $pfxdepth > $project_maxdepth) {