X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FOverIdx.pm;h=f49dfa000431af739eb5e82060c5596fe1af5baf;hb=d34a4b80724e3f77a507ad08b91039427b0e09d5;hp=fd521bdd1e20a62f5a38e8c5308663b104fadb7f;hpb=87678710135973f72722258e171fc00f85c86ec8;p=public-inbox.git diff --git a/lib/PublicInbox/OverIdx.pm b/lib/PublicInbox/OverIdx.pm index fd521bdd..f49dfa00 100644 --- a/lib/PublicInbox/OverIdx.pm +++ b/lib/PublicInbox/OverIdx.pm @@ -216,15 +216,13 @@ sub link_refs { } sub parse_references ($$$) { - my ($smsg, $mid0, $mids) = @_; - my $mime = $smsg->{mime}; - my $hdr = $mime->header_obj; + my ($smsg, $hdr, $mids) = @_; my $refs = references($hdr); push(@$refs, @$mids) if scalar(@$mids) > 1; return $refs if scalar(@$refs) == 0; # prevent circular references here: - my %seen = ( $mid0 => 1 ); + my %seen = ( $smsg->{mid} => 1 ); my @keep; foreach my $ref (@$refs) { if (length($ref) > PublicInbox::MID::MAX_MID_SIZE) { @@ -258,14 +256,14 @@ sub add_overview { }, 'PublicInbox::Smsg'; my $hdr = $mime->header_obj; my $mids = mids_for_index($hdr); - my $refs = parse_references($smsg, $mid0, $mids); + my $refs = parse_references($smsg, $hdr, $mids); my $subj = $smsg->subject; my $xpath; if ($subj ne '') { $xpath = subject_path($subj); $xpath = id_compress($xpath); } - my $dd = $smsg->to_doc_data($oid, $mid0); + my $dd = $smsg->to_doc_data; utf8::encode($dd); $dd = compress($dd); my $ds = msg_timestamp($hdr, $times->{autime});