gitweb: Faster project search

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index a4b983718ea52f51b6dea8bc5154f0bed3bf1374af3bc1ca8348cc95c0a1265c..4c4e2d02b5e9f139653d56cc5033603d65c5c08cd5ff1b761166a8ef60845f21 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -2988,6 +2988,10 @@ sub search_projects_list {
        return @$projlist
                unless ($tagfilter || $searchtext);
 
+       # searching projects require filling to be run before it;
+       fill_project_list_info($projlist,
+                              $tagfilter  ? 'ctags' : (),
+                              $searchtext ? ('path', 'descr') : ());
        my @projects;
  PROJECT:
        foreach my $pr (@$projlist) {
@@ -5388,12 +5392,13 @@ sub git_project_list_body {
        # filtering out forks before filling info allows to do less work
        @projects = filter_forks_from_projects_list(\@projects)
                if ($check_forks);
-       @projects = fill_project_list_info(\@projects);
-       # searching projects require filling to be run before it
+       # search_projects_list pre-fills required info
        @projects = search_projects_list(\@projects,
                                         'searchtext' => $searchtext,
                                         'tagfilter'  => $tagfilter)
                if ($tagfilter || $searchtext);
+       # fill the rest
+       @projects = fill_project_list_info(\@projects);
 
        $order ||= $default_projects_order;
        $from = 0 unless defined $from;