1 files changed, 8 insertions, 0 deletions
diff --git a/lib/PublicInbox/Msgmap.pm b/lib/PublicInbox/Msgmap.pm
index a147b9f3..8e81fba0 100644
--- a/lib/PublicInbox/Msgmap.pm
+++ b/lib/PublicInbox/Msgmap.pm
@@ -140,6 +140,14 @@ sub mid_delete {
          $sth->execute;
  }
  
+sub num_delete {
+        my ($self, $num) = @_;
+        my $dbh = $self->{dbh};
+        my $sth = $dbh->prepare('DELETE FROM msgmap WHERE num = ?');
+        $sth->bind_param(1, $num);
+        $sth->execute;
+}
+
  sub create_tables {
          my ($dbh) = @_;
          my $e;