lei q: support --alert=CMD for early MUA users

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

diff --git a/lib/PublicInbox/LeiOverview.pm b/lib/PublicInbox/LeiOverview.pm
index f0ac468417cc5ea4666bc3cbb589a310ef83957e..98c89d12d197e0829fe39a68c510478eba71b128 100644 (file)
--- a/lib/PublicInbox/LeiOverview.pm
+++ b/lib/PublicInbox/LeiOverview.pm
@@ -98,7 +98,10 @@ sub new {
                $opt->{'sort'} //= 'docid' if $dst ne '/dev/stdout';
                $lei->{l2m} = eval { PublicInbox::LeiToMail->new($lei) };
                return $lei->fail($@) if $@;
-               $lei->{early_mua} = 1 if $opt->{mua} && $lei->{l2m}->lock_free;
+               if ($opt->{mua} && $lei->{l2m}->lock_free) {
+                       $lei->{early_mua} = 1;
+                       $opt->{alert} //= [ '-WINCH,-bell' ] if -t $lei->{1};
+               }
        }
        $self;
 }