gitweb: Fix 'grep' search for multiple matches in file

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 1ab150d59d7571948e864bf4052561d9969748bd2aab3a4de84eefe4c1816b6e..8ed2ba1a5dcc297881158ee7af5ca001e4121a6b6c671106ea95c155eafcf5be 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -5916,9 +5916,10 @@ sub git_search_files {
        my $alternate = 1;
        my $matches = 0;
        my $lastfile = '';
+       my $file_href;
        while (my $line = <$fd>) {
                chomp $line;
-               my ($file, $file_href, $lno, $ltext, $binary);
+               my ($file, $lno, $ltext, $binary);
                last if ($matches++ > 1000);
                if ($line =~ /^Binary file (.+) matches$/) {
                        $file = $1;