crontab: fix day-of-week to be OR instead of AND days.

windows-drag
John Benediktsson 2019-03-23 08:21:26 -07:00
parent e4c94e7d98
commit deb4b7c0d6
1 changed files with 6 additions and 5 deletions

View File

@ -68,15 +68,16 @@ CONSTANT: aliases H{
timestamp day>> :> day
cronentry days>> [ day >= ] find nip
dup day = [ drop ] [
[ cronentry days>> first timestamp 1 +month drop ] unless*
timestamp 0 >>hour 0 >>minute day<< drop t
] if
[ day - ] [
timestamp days-in-month cronentry days>> first -
] if*
timestamp day-of-week :> weekday
cronentry days-of-week>> [ weekday >= ] find nip [
cronentry days-of-week>> first 7 +
] unless* weekday - [
] unless* weekday -
min [
timestamp 0 >>hour 0 >>minute swap +day 2drop t
] unless-zero