diff options
| author | Paul Buetow <paul@buetow.org> | 2022-04-21 23:31:45 +0200 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2022-04-21 23:31:45 +0200 |
| commit | 70a177bfab34c1ea5146a33ec718e9db77fa20d6 (patch) | |
| tree | bfb460d7e5b25d86d43d02b13202fed62d4f648f /lib/PerlDaemon | |
| parent | f5f29f37dd40b5446acdd59629c604af62bf8e56 (diff) | |
Make PerlDaemon run on OpenBSD 7.1
Diffstat (limited to 'lib/PerlDaemon')
| -rw-r--r-- | lib/PerlDaemon/Logger.pm | 3 | ||||
| -rw-r--r-- | lib/PerlDaemon/RunModules.pm | 2 |
2 files changed, 0 insertions, 5 deletions
diff --git a/lib/PerlDaemon/Logger.pm b/lib/PerlDaemon/Logger.pm index 52b5eb7..7285588 100644 --- a/lib/PerlDaemon/Logger.pm +++ b/lib/PerlDaemon/Logger.pm @@ -2,8 +2,6 @@ package PerlDaemon::Logger; use strict; use warnings; -use threads; -use threads::shared; use Shell qw(mv); use POSIX qw(strftime); @@ -23,7 +21,6 @@ sub new ($$) { $SELF = bless { conf => $conf }, $class; $SELF->{queue} = []; - share $SELF->{queue}; return $SELF; } diff --git a/lib/PerlDaemon/RunModules.pm b/lib/PerlDaemon/RunModules.pm index 1b6b486..147325a 100644 --- a/lib/PerlDaemon/RunModules.pm +++ b/lib/PerlDaemon/RunModules.pm @@ -4,7 +4,6 @@ package PerlDaemon::RunModules; use strict; use warnings; -use threads qw(exit stringify); use Time::HiRes qw(gettimeofday tv_interval); sub new ($$) { @@ -82,7 +81,6 @@ sub do ($) { $scheduler->{$k}{lastrun} = $now; $v->do(); - } } } |
