lei rm|tag: drop redundant mbox+net callbacks

These are supplied by the base LeiInput class

diff --git a/lib/PublicInbox/LeiRm.pm b/lib/PublicInbox/LeiRm.pm
index 97b1c5c15dc4453205f9e9b6244486a2ba64d70e..524c178e3b471e5fba46a5f2bbd5382b065ac4b1 100644 (file)
--- a/lib/PublicInbox/LeiRm.pm
+++ b/lib/PublicInbox/LeiRm.pm
@@ -13,16 +13,6 @@ sub input_eml_cb { # used by PublicInbox::LeiInput::input_fh
        $self->{lei}->{sto}->wq_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);

diff --git a/lib/PublicInbox/LeiTag.pm b/lib/PublicInbox/LeiTag.pm
index 77654d1a2f2246d270ce5a3ed68888e499f46c36..d64a9f86e05ac69cc440874a39c88b1bd88465e7 100644 (file)
--- a/lib/PublicInbox/LeiTag.pm
+++ b/lib/PublicInbox/LeiTag.pm
@@ -19,23 +19,12 @@ sub input_eml_cb { # used by PublicInbox::LeiInput::input_fh
        }
 }
 
-sub input_mbox_cb {
-       my ($eml, $self) = @_;
-       $eml->header_set($_) for (qw(X-Status Status));
-       input_eml_cb($self, $eml);
-}
-
 sub pmdir_cb { # called via wq_io_do from LeiPmdir->each_mdir_fn
        my ($self, $f) = @_;
        my $eml = eml_from_path($f) or return;
        input_eml_cb($self, $eml);
 }
 
-sub input_net_cb { # imap_each, nntp_each cb
-       my ($url, $uid, $kw, $eml, $self) = @_;
-       input_eml_cb($self, $eml);
-}
-
 sub lei_tag { # the "lei tag" method
        my ($lei, @argv) = @_;
        my $sto = $lei->_lei_store(1);