gitweb: fix project list if PATH_INFO=="/".

diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index 43285798e9beb0653278e42065bd829dd83d28bc..cd9395df93be0b76d3831f3d6340e5e8a02898e7 100755 (executable)
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -34,7 +34,7 @@
 our $git_temp = "/tmp/gitweb";
 
 # target of the home link on top of all pages
-our $home_link = $my_uri;
+our $home_link = $my_uri || "/";
 
 # string of the home link on top of all pages
 our $home_link_str = "++GITWEB_HOME_LINK_STR++";
@@ -95,8 +95,9 @@
 if (defined $project) {
        $project =~ s|^/||;
        $project =~ s|/$||;
+       $project = undef unless $project;
 }
-if (defined $project && $project) {
+if (defined $project) {
        if (!validate_input($project)) {
                die_error(undef, "Invalid project parameter");
        }