lei rm: move generic input_maildir_cb to LeiInput parent class

[public-inbox.git] / lib / PublicInbox / LeiRm.pm

diff --git a/lib/PublicInbox/LeiRm.pm b/lib/PublicInbox/LeiRm.pm
index 3371f3ed00e469f66233567ff50c782532514a92..cc1abbff66cb1e47a9fd0cd111d155059c10dffe 100644 (file)
--- a/lib/PublicInbox/LeiRm.pm
+++ b/lib/PublicInbox/LeiRm.pm
@@ -10,22 +10,7 @@ use parent qw(PublicInbox::IPC PublicInbox::LeiInput);
 
 sub input_eml_cb { # used by PublicInbox::LeiInput::input_fh
        my ($self, $eml) = @_;
-       $self->{lei}->{sto}->ipc_do('remove_eml', $eml);
-}
-
-sub input_mbox_cb { # MboxReader callback
-       my ($eml, $self) = @_;
-       input_eml_cb($self, $eml);
-}
-
-sub input_net_cb { # callback for ->imap_each, ->nntp_each
-       my (undef, undef, $kw, $eml, $self) = @_; # @_[0,1]: url + uid ignored
-       input_eml_cb($self, $eml);
-}
-
-sub input_maildir_cb {
-       my (undef, $kw, $eml, $self) = @_; # $_[0] $filename ignored
-       input_eml_cb($self, $eml);
+       $self->{lei}->{sto}->wq_do('remove_eml', $eml);
 }
 
 sub lei_rm {