diff options
| author | Eric Wong <e@80x24.org> | 2023-09-24 21:08:21 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2023-09-24 23:14:24 +0000 |
| commit | 0e0f4419064a5e0b7902bd09a4e4e055bde5db70 (patch) | |
| tree | 5b95e5f29f967019cfc87c0a87f899c65721f7e2 /lib/PublicInbox/LEI.pm | |
| parent | e2a38b696253a45577ed86e723c07d8ff773dac7 (diff) | |
| download | public-inbox-0e0f4419064a5e0b7902bd09a4e4e055bde5db70.tar.gz | |
Perl v5.16.3 (and possibly some later versions) complain about
this, but newer (v5.32.1) are fine with it.
Fixes: e281363ba937 ("lei: ensure we run DESTROY|END at daemon exit w/ kqueue")
Diffstat (limited to 'lib/PublicInbox/LEI.pm')
| -rw-r--r-- | lib/PublicInbox/LEI.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm index 1ead9bf6..be77fa90 100644 --- a/lib/PublicInbox/LEI.pm +++ b/lib/PublicInbox/LEI.pm @@ -1381,9 +1381,9 @@ sub lazy_start { PublicInbox::DS::sig_setmask($oldset) if @kq_ign; # exit() may trigger waitpid via various DESTROY, ensure interruptible - local @SIG{TERM} = sub { exit(POSIX::SIGTERM + 128) }; - local @SIG{INT} = sub { exit(POSIX::SIGINT + 128) }; - local @SIG{QUIT} = sub { exit(POSIX::SIGQUIT + 128) }; + local $SIG{TERM} = sub { exit(POSIX::SIGTERM + 128) }; + local $SIG{INT} = sub { exit(POSIX::SIGINT + 128) }; + local $SIG{QUIT} = sub { exit(POSIX::SIGQUIT + 128) }; PublicInbox::DS::sig_setmask($oldset) if !@kq_ign; dump_and_clear_log(); exit($exit_code // 0); |