summaryrefslogtreecommitdiff
path: root/lib/IO/Async/Timer
diff options
context:
space:
mode:
authorgregor herrmann <gregoa@debian.org>2018-04-19 21:18:36 +0200
committergregor herrmann <gregoa@debian.org>2018-04-19 21:18:36 +0200
commitced80112c15efcc6dea1ab77ba4f501f855f6f22 (patch)
treeb64d8aa57f24a4c8390cc6c588d0bc7649ead876 /lib/IO/Async/Timer
parent39d2852db7b8f489e8d4f031a480ba824fc5951a (diff)
New upstream version 0.72
Diffstat (limited to 'lib/IO/Async/Timer')
-rw-r--r--lib/IO/Async/Timer/Absolute.pm2
-rw-r--r--lib/IO/Async/Timer/Countdown.pm2
-rw-r--r--lib/IO/Async/Timer/Periodic.pm4
3 files changed, 4 insertions, 4 deletions
diff --git a/lib/IO/Async/Timer/Absolute.pm b/lib/IO/Async/Timer/Absolute.pm
index ae3c036..fcb3ba2 100644
--- a/lib/IO/Async/Timer/Absolute.pm
+++ b/lib/IO/Async/Timer/Absolute.pm
@@ -9,7 +9,7 @@ use strict;
use warnings;
use base qw( IO::Async::Timer );
-our $VERSION = '0.71';
+our $VERSION = '0.72';
use Carp;
diff --git a/lib/IO/Async/Timer/Countdown.pm b/lib/IO/Async/Timer/Countdown.pm
index 462c838..88fac76 100644
--- a/lib/IO/Async/Timer/Countdown.pm
+++ b/lib/IO/Async/Timer/Countdown.pm
@@ -9,7 +9,7 @@ use strict;
use warnings;
use base qw( IO::Async::Timer );
-our $VERSION = '0.71';
+our $VERSION = '0.72';
use Carp;
diff --git a/lib/IO/Async/Timer/Periodic.pm b/lib/IO/Async/Timer/Periodic.pm
index 00bbb06..527dcae 100644
--- a/lib/IO/Async/Timer/Periodic.pm
+++ b/lib/IO/Async/Timer/Periodic.pm
@@ -9,7 +9,7 @@ use strict;
use warnings;
use base qw( IO::Async::Timer );
-our $VERSION = '0.71';
+our $VERSION = '0.72';
use Carp;
@@ -185,7 +185,7 @@ sub _reschedule
}
elsif( $resched eq "skip" ) {
# How many ticks are needed?
- my $ticks = POSIX::ceil( $now - $self->{next_time} );
+ my $ticks = POSIX::ceil( ( $now - $self->{next_time} ) / $next_interval );
# $self->{last_ticks} = $ticks;
$self->{next_time} += $next_interval * $ticks;
}