fix(jobs): wake more often during waitUntil

This commit is contained in:
Gregor Kleen 2021-02-24 12:46:06 +01:00
parent b9cc5b9970
commit 6115b83bb3

View File

@ -449,7 +449,7 @@ execCrontab = do
if
| diffT < acc -> return True
| otherwise -> do
delay <- liftIO . newDelay . round $ waitTime * 1e6
delay <- liftIO . newDelay . round $ waitTime / 2 * 1e6
let
awaitDelayThread = False <$ waitDelay delay
awaitCrontabChange = do