diff options
-rw-r--r-- | lib/PublicInbox/LEI.pm | 8 | ||||
-rw-r--r-- | lib/PublicInbox/LeiOverview.pm | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm index e2a945a4..e29b13c3 100644 --- a/lib/PublicInbox/LEI.pm +++ b/lib/PublicInbox/LEI.pm @@ -227,9 +227,9 @@ my %OPTDESC = ( 'show threads|t' => 'display entire thread a message belongs to', 'q threads|t' => 'return all messages in the same threads as the actual match(es)', -'alert=s@' => ['CMD,-WINCH,-bell,<any command>', +'alert=s@' => ['CMD,:WINCH,:bell,<any command>', 'run command(s) or perform ops when done writing to output ' . - '(default: "-WINCH,-bell" with --mua and Maildir/IMAP output, ' . + '(default: ":WINCH,:bell" with --mua and Maildir/IMAP output, ' . 'nothing otherwise)' ], 'augment|a' => 'augment --output destination instead of clobbering', @@ -758,14 +758,14 @@ sub poke_mua { # forces terminal MUAs to wake up and hopefully notice new mail my ($self) = @_; my $alerts = $self->{opt}->{alert} // return; while (my $op = shift(@$alerts)) { - if ($op eq '-WINCH') { + if ($op eq ':WINCH') { # hit the process group that started the MUA if ($self->{sock}) { send($self->{sock}, '-WINCH', MSG_EOR); } elsif ($self->{oneshot}) { kill('-WINCH', $$); } - } elsif ($op eq '-bell') { + } elsif ($op eq ':bell') { out($self, "\a"); } elsif ($op =~ /(?<!\\),/) { # bare ',' (not ',,') push @$alerts, split(/(?<!\\),/, $op); diff --git a/lib/PublicInbox/LeiOverview.pm b/lib/PublicInbox/LeiOverview.pm index 98c89d12..c820f0d7 100644 --- a/lib/PublicInbox/LeiOverview.pm +++ b/lib/PublicInbox/LeiOverview.pm @@ -100,7 +100,7 @@ sub new { return $lei->fail($@) if $@; if ($opt->{mua} && $lei->{l2m}->lock_free) { $lei->{early_mua} = 1; - $opt->{alert} //= [ '-WINCH,-bell' ] if -t $lei->{1}; + $opt->{alert} //= [ ':WINCH,:bell' ] if -t $lei->{1}; } } $self; |