| Subject: | Duration is never correct for times under a day? |
Running on Ubuntu with Time::Business 0.18, in UK locale in BST. Perl 5.18.
Flagged as Critical, because it just isn't returning the right answer for the one thing it has to do (although it isn't crashing in doing so, it's the only thing is has to do, and it's not doing it).
When the time is a day or less, the time is not correct, I believe. This can be demonstrated with:
----
use Time::Business;
my $workweek = Time::Business->new({
WORKDAYS => [1,2,3,4,5],
STARTTIME => '9:00',
STOPTIME => '17:00',
});
print "Duration: ", $workweek->duration(0,60*60*24), "\n";
----
Expected output is 8 hours.
Actual output is 0 seconds.