return $refs if scalar(@$refs) == 0;
# prevent circular references here:
- my %seen = ( $smsg->{mid} => 1 );
+ my %seen = ( ($smsg->{mid} // '') => 1 );
my @keep;
foreach my $ref (@$refs) {
if (length($ref) > PublicInbox::MID::MAX_MID_SIZE) {
warn "References: <$ref> too long, ignoring\n";
next;
}
- push(@keep, $ref) unless $seen{$ref}++;
+ $seen{$ref} //= push(@keep, $ref);
}
$smsg->{references} = '<'.join('> <', @keep).'>' if @keep;
\@keep;