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

diff --git a/extra/crontab/crontab.factor b/extra/crontab/crontab.factor
index 2289c7ec265d1bd9adf2968c3a099a85dd3eb4de..5745b97a78e2589b6fbc7aea46f6fec4cff5e7aa 100644 (file)
--- a/extra/crontab/crontab.factor
+++ b/extra/crontab/crontab.factor
@@ -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