diff --git a/src/Jobs.hs b/src/Jobs.hs index b61556caa..02f207bf6 100644 --- a/src/Jobs.hs +++ b/src/Jobs.hs @@ -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