mirrors/git
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gitweb: Make the by_tag filter delve in forks as well

Browse Source 
This requires us to build a full index including forks and then weed
them out only when printing.

Signed-off-by: Petr Baudis <petr.baudis@novartis.com>
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
This commit is contained in:
Petr Baudis
2008-10-02 17:17:01 +02:00
committed by Shawn O. Pearce
parent aed93de428
commit 42326110b5
1 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
gitweb/gitweb.perl
View File

@ -1889,9 +1889,7 @@ sub git_get_projects_list {
my $subdir = substr($File::Find::name, $pfxlen + 1); my $subdir = substr($File::Find::name, $pfxlen + 1);
# we check related file in $projectroot # we check related file in $projectroot
if ($check_forks and $subdir =~ m#/.#) { if (check_export_ok("$projectroot/$filter/$subdir")) {
$File::Find::prune = 1;
} elsif (check_export_ok("$projectroot/$filter/$subdir")) {
push @list, { path => ($filter ? "$filter/" : '') . $subdir }; push @list, { path => ($filter ? "$filter/" : '') . $subdir };
$File::Find::prune = 1; $File::Find::prune = 1;
} }
@ -3724,6 +3722,7 @@ sub print_sort_th_num {
} }
sub git_project_list_body { sub git_project_list_body {
# actually uses global variable $project
my ($projlist, $order, $from, $to, $extra, $no_header) = @_; my ($projlist, $order, $from, $to, $extra, $no_header) = @_;
my ($check_forks) = gitweb_check_feature('forks'); my ($check_forks) = gitweb_check_feature('forks');
@ -3766,7 +3765,15 @@ sub git_project_list_body {
my $tagfilter = $cgi->param('by_tag'); my $tagfilter = $cgi->param('by_tag');
for (my $i = $from; $i <= $to; $i++) { for (my $i = $from; $i <= $to; $i++) {
my $pr = $projects[$i]; my $pr = $projects[$i];
next if $tagfilter and $show_ctags and not grep { lc $_ eq lc $tagfilter } keys %{$pr->{'ctags'}}; next if $tagfilter and $show_ctags and not grep { lc $_ eq lc $tagfilter } keys %{$pr->{'ctags'}};
# Weed out forks
if ($check_forks) {
my $forkbase = $project; $forkbase ||= ''; $forkbase =~ s#\.git$#/#;
$forkbase="^$forkbase" if $forkbase;
next if not $tagfilter and $pr->{'path'} =~ m#$forkbase.*/.*#; # regexp-safe
}
if ($alternate) { if ($alternate) {
print "<tr class=\"dark\">\n"; print "<tr class=\"dark\">\n";
} else { } else {