gitweb: Silence 'Variable VAR may be unavailable' warnings

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 1d675614b5b6ecfe5df0d5bd3201b1b2fcf4571eeb9d2e61c430605a2b19b6b7..7d325ae984d91145b856e2daa2963dffcd4b9912d0899f9de9eba0cfc4704526 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -2442,6 +2442,9 @@ sub git_get_projects_list {
                        follow_skip => 2, # ignore duplicates
                        dangling_symlinks => 0, # ignore dangling symlinks, silently
                        wanted => sub {
                        follow_skip => 2, # ignore duplicates
                        dangling_symlinks => 0, # ignore dangling symlinks, silently
                        wanted => sub {

+                               # global variables
+                               our $project_maxdepth;
+                               our $projectroot;

                                # skip project-list toplevel, if we get it.
                                return if (m!^[/.]$!);
                                # only directories can be git repositories
                                # skip project-list toplevel, if we get it.
                                return if (m!^[/.]$!);
                                # only directories can be git repositories