On 10/31/06, Jakub Narebski <jnareb@xxxxxxxxx> wrote:
$dir =~ s!/+$!!;
That works. Attaching the diff below -aneesh
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl index bf5f829..4343450 100755 --- a/gitweb/gitweb.perl +++ b/gitweb/gitweb.perl @@ -897,6 +897,8 @@ sub git_get_projects_list { if (-d $projects_list) { # search in directory my $dir = $projects_list; + # remove the trailing "/" + $dir =~ s!/+$!!; my $pfxlen = length("$dir"); File::Find::find({