t/10-constructors.t: fix abs_diff function to actually allow the amou…

…nt of leeway it's meant to
pink-mist · Apr 23, 2017 · 75a115c · 75a115c
1 parent e1ff9e7
commit 75a115c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/10-constructors.t b/t/10-constructors.t
@@ -13,7 +13,7 @@ use Time::C;
 
 # test all the Time::C constructors thoroughly
 
-sub abs_diff { my ($x, $y, $z) = @_; return abs( $x - $y ) < $z; }
+sub abs_diff { my ($x, $y, $z) = @_; return abs( $x - $y ) <= $z; }
 
 my $epoch = time;
 my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) =