X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/7e49981d34284e6250b9f617ef1be11ef601d5a3aa0570dfb3962af6886ea144..ad4789651e6fa6129c287af08a033014a38f2e78ecf450ffdf9f8197b7cc0139:/gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 2bfdcca..28748c8 100755
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -2832,8 +2832,6 @@ sub git_get_projects_list {
 	my $filter = shift || '';
 	my @list;
 
-	$filter =~ s/\.git$//;
-
 	if (-d $projects_list) {
 		# search in directory
 		my $dir = $projects_list;
@@ -6008,7 +6006,9 @@ sub git_forks {
 		die_error(400, "Unknown order parameter");
 	}
 
-	my @list = git_get_projects_list($project);
+	my $filter = $project;
+	$filter =~ s/\.git$//;
+	my @list = git_get_projects_list($filter);
 	if (!@list) {
 		die_error(404, "No forks found");
 	}
@@ -6067,7 +6067,9 @@ sub git_summary {
 
 	if ($check_forks) {
 		# find forks of a project
-		@forklist = git_get_projects_list($project);
+		my $filter = $project;
+		$filter =~ s/\.git$//;
+		@forklist = git_get_projects_list($filter);
 		# filter out forks of forks
 		@forklist = filter_forks_from_projects_list(\@forklist)
 			if (@forklist);