From be5e609b1fe879428784d78fa62a559d0764a85a Mon Sep 17 00:00:00 2001 From: Steffen Date: Mon, 12 Aug 2024 18:01:59 +0200 Subject: [PATCH] fix(build): minor linter fix --- src/Jobs/Handler/SynchroniseAvs.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Jobs/Handler/SynchroniseAvs.hs b/src/Jobs/Handler/SynchroniseAvs.hs index db4d9482a..1a3ed10ab 100644 --- a/src/Jobs/Handler/SynchroniseAvs.hs +++ b/src/Jobs/Handler/SynchroniseAvs.hs @@ -158,7 +158,7 @@ dispatchJobSynchroniseAvsLicences = JobHandlerException $ do -- when (synchLevel oks <- catchAllAvs $ setLicencesAvs $ Set.map (AvsPersonLicence aLic) apids when (oks > 0) $ logit $ toMaybe (oks /= n) [st|Only #{tshow oks}/#{tshow n} licence changes accepted by AVS|] else - logit $ Just $ [st|Too many changes at once. Consider increasing avs-licence-synch-max-changes #{tshow maxChanges}|] + logit $ Just [st|Too many changes at once. Consider increasing avs-licence-synch-max-changes #{tshow maxChanges}|] | otherwise = return () (AvsLicenceDifferences{..}, rsChanged) <- retrieveDifferingLicences