diff options
| author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-22 00:12:25 +0000 |
|---|---|---|
| committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-22 00:18:22 +0000 |
| commit | b41c5982647a8ecccbadf159381840d74d36248a (patch) | |
| tree | 882128cc3cb94e0218f50ab511d214242e349949 | |
| parent | 2e5d47e4c02757c027461149b3e1568d713252b1 (diff) | |
| download | public-inbox-b41c5982647a8ecccbadf159381840d74d36248a.tar.gz | |
I keep forgetting to run "make syntax"
| -rw-r--r-- | lib/PublicInbox/Daemon.pm | 2 | ||||
| -rw-r--r-- | lib/PublicInbox/EvCleanup.pm | 4 | ||||
| -rw-r--r-- | lib/PublicInbox/Inbox.pm | 2 | ||||
| -rw-r--r-- | lib/PublicInbox/SearchMsg.pm | 2 |
4 files changed, 6 insertions, 4 deletions
diff --git a/lib/PublicInbox/Daemon.pm b/lib/PublicInbox/Daemon.pm index 9d27d2be..4629aadb 100644 --- a/lib/PublicInbox/Daemon.pm +++ b/lib/PublicInbox/Daemon.pm @@ -460,7 +460,7 @@ sub daemon_loop ($$) { @listeners = map { PublicInbox::Listener->new($_, $post_accept) } @listeners; - $PublicInbox::EvCleanup::ENABLED = 1; + PublicInbox::EvCleanup::enable(); Danga::Socket->EventLoop; $parent_pipe = undef; } diff --git a/lib/PublicInbox/EvCleanup.pm b/lib/PublicInbox/EvCleanup.pm index 384efd3d..1a3a3d5e 100644 --- a/lib/PublicInbox/EvCleanup.pm +++ b/lib/PublicInbox/EvCleanup.pm @@ -8,7 +8,9 @@ use warnings; use base qw(Danga::Socket); use fields qw(rd); -our $ENABLED; +my $ENABLED; +sub enabled { $ENABLED } +sub enable { $ENABLED = 1 } my $singleton; my $asapq = [ [], undef ]; my $nextq = [ [], undef ]; diff --git a/lib/PublicInbox/Inbox.pm b/lib/PublicInbox/Inbox.pm index f3070383..666c81d7 100644 --- a/lib/PublicInbox/Inbox.pm +++ b/lib/PublicInbox/Inbox.pm @@ -29,7 +29,7 @@ sub cleanup_task () { sub _cleanup_later ($) { my ($self) = @_; - return unless $PublicInbox::EvCleanup::ENABLED; + return unless PublicInbox::EvCleanup::enabled(); $cleanup_timer ||= PublicInbox::EvCleanup::later(*cleanup_task); $CLEANUP->{"$self"} = $self; } diff --git a/lib/PublicInbox/SearchMsg.pm b/lib/PublicInbox/SearchMsg.pm index de1fd131..dd3d58d0 100644 --- a/lib/PublicInbox/SearchMsg.pm +++ b/lib/PublicInbox/SearchMsg.pm @@ -62,7 +62,7 @@ sub load_doc { sub bytes ($) { get_val($_[0]->{doc}, &PublicInbox::Search::BYTES) } sub lines ($) { get_val($_[0]->{doc}, &PublicInbox::Search::LINES) } sub num ($) { - $_[0]->{num} ||= get_val($_[0]->{doc}, PublicInbox::Search::NUM) + $_[0]->{num} ||= get_val($_[0]->{doc}, PublicInbox::Search::NUM()) } sub __hdr ($$) { |