From 4a032f3ede78ceb7a4709101829bc640ce63fd1c Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Wed, 24 Oct 2018 18:01:06 +0200 Subject: [PATCH] Never repeat NotificationSubmissionActive --- src/Jobs/Crontab.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Jobs/Crontab.hs b/src/Jobs/Crontab.hs index f57952528..2e5fa6c11 100644 --- a/src/Jobs/Crontab.hs +++ b/src/Jobs/Crontab.hs @@ -52,7 +52,7 @@ determineCrontab = execWriterT $ do (JobCtlQueue $ JobQueueNotification NotificationSheetActive{..}) Cron { cronInitial = CronTimestamp $ utcToLocalTimeTZ appTZ sheetActiveFrom - , cronRepeat = CronRepeatOnChange -- Allow repetition of the notification (if something changes), but wait at least an hour + , cronRepeat = CronRepeatNever , cronRateLimit = appNotificationRateLimit , cronNotAfter = Right . CronTimestamp $ utcToLocalTimeTZ appTZ sheetActiveTo } @@ -60,7 +60,7 @@ determineCrontab = execWriterT $ do (JobCtlQueue $ JobQueueNotification NotificationSheetInactive{..}) Cron { cronInitial = CronTimestamp . utcToLocalTimeTZ appTZ . max sheetActiveFrom $ addUTCTime (-nominalDay) sheetActiveTo - , cronRepeat = CronRepeatOnChange + , cronRepeat = CronRepeatOnChange -- Allow repetition of the notification (if something changes), but wait at least an hour , cronRateLimit = appNotificationRateLimit , cronNotAfter = Right . CronTimestamp $ utcToLocalTimeTZ appTZ sheetActiveTo }