about summary refs log tree commit homepage
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2023-12-05 09:46:22 +0000
committerEric Wong <e@80x24.org>2023-12-05 22:05:10 +0000
commit62d48e5737e08d495452b7cfaea96d11686c5f8a (patch)
tree9b7c7fae9e847aaed0e58b26cdb5d89ba54f23db
parent89dfe65570f82a24c6f37cdc3e88b5df2562ea38 (diff)
downloadpublic-inbox-62d48e5737e08d495452b7cfaea96d11686c5f8a.tar.gz
Oddly, Perl did not warn about this.  Spotted while confirming
abbreviated OIDs are also indexed when unabbreviated OIDs
appear.
-rw-r--r--lib/PublicInbox/SearchIdx.pm1
1 files changed, 0 insertions, 1 deletions
diff --git a/lib/PublicInbox/SearchIdx.pm b/lib/PublicInbox/SearchIdx.pm
index 86c435fd..1bf471fc 100644
--- a/lib/PublicInbox/SearchIdx.pm
+++ b/lib/PublicInbox/SearchIdx.pm
@@ -715,7 +715,6 @@ sub nr_quiet_rm { delete($_[0]->{-quiet_rm}) // 0 }
 sub index_git_blob_id {
         my ($doc, $pfx, $objid) = @_;
 
-        my $len = length($objid);
         for (my $len = length($objid); $len >= 7; ) {
                 $doc->add_term($pfx.$objid);
                 $objid = substr($objid, 0, --$len);