lib/PublicInbox/Over.pm | 7 ++++--- diff --git a/lib/PublicInbox/Over.pm b/lib/PublicInbox/Over.pm index 402cbf7ce07181144f066a252ffb5a16f25bfa17..1faeff418f4d9caadc30eb6e6c9d19541b246caf 100644 --- a/lib/PublicInbox/Over.pm +++ b/lib/PublicInbox/Over.pm @@ -179,11 +179,12 @@ sub get_art { my ($self, $num) = @_; my $dbh = $self->connect; - my $smsg = $dbh->selectrow_hashref(<<'', undef, $num); + my $sth = $dbh->prepare_cached(<<'', undef, 1); SELECT num,ds,ts,ddd FROM over WHERE num = ? LIMIT 1 - return load_from_row($smsg) if $smsg; - undef; + $sth->execute($num); + my $smsg = $sth->fetchrow_hashref; + $smsg ? load_from_row($smsg) : undef; } sub next_by_mid {