What if first provided date isn't working day?

[olorin37]

If I understand correctly purpose of the function. It should always returns working days. So now programmer is forced to provide working day as the first one of the range to get correct answer.

User can workaround it by

# taking the first working day counting from "today" 
my $first-woking-day = $cal.workdays-away(Date.today - 1, 1);

# This should work already:
my $first-working-day = $cal.workdays-away(Date.today, 0);

Problematic line:

Date-WorkdayCalendar/lib/Date/WorkdayCalendar.pm

Line 87 in d5adbda

return $start if $days == 0;

[olorin37]

Another example how it doesn't work (here in case of Workdate class):

# 2020-10-17 is Saturday, and we get:
❯ raku -e 'use Date::WorkdayCalendar; Workdate.new(Date.new("2020-10-17")).say'
2020-10-17

# With WA applied:
❯ raku -e 'use Date::WorkdayCalendar; Workdate.new(Date.new("2020-10-17") -1 ).succ.say'
2020-10-19