From 3052acd27f3119510b3efa33d77b610d6c4f1c85 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 13 Apr 2021 10:54:46 +0000 Subject: lei: add "lei up" to complement "lei q --save" The command isn't finalized, yet, but it's intended to update an existing saved search. --- lib/PublicInbox/LeiToMail.pm | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'lib/PublicInbox/LeiToMail.pm') diff --git a/lib/PublicInbox/LeiToMail.pm b/lib/PublicInbox/LeiToMail.pm index bd2b714a..4ebaf8f3 100644 --- a/lib/PublicInbox/LeiToMail.pm +++ b/lib/PublicInbox/LeiToMail.pm @@ -349,11 +349,13 @@ sub new { die "bad mail --format=$fmt\n"; } $self->{dst} = $dst; - my $dd_cls = 'PublicInbox::'. - ($lei->{opt}->{save} ? 'LeiSavedSearch' : 'LeiDedupe'); - eval "require $dd_cls"; - die "$dd_cls: $@" if $@; - $lei->{dedupe} = $dd_cls->new($lei); + $lei->{dedupe} = $lei->{lss} // do { + my $dd_cls = 'PublicInbox::'. + ($lei->{opt}->{save} ? 'LeiSavedSearch' : 'LeiDedupe'); + eval "require $dd_cls"; + die "$dd_cls: $@" if $@; + $dd_cls->new($lei); + }; $self; } -- cgit v1.2.3-24-ge0c7