chore(health): minor change treating HealthInactive

src/Application.hs

@@ -551,7 +551,7 @@ warpSettings foundation = defaultSettings
                                   atomically $ do
                                     results <- readTVar $ foundation ^. _appHealthReport
                                     guard $ activeChecks == Set.map (classifyHealthReport . snd) results
-                                    guard . (/= Min HealthFailure) $ foldMap (Min . healthReportStatus . snd) results
+                                    guard . (== Min HealthSuccess) $ foldMap (Min . healthReportStatus . snd) results
                                   notifyReady
                               | otherwise
                                 -> notifyReady

src/Jobs/Handler/SynchroniseAvs.hs

@@ -47,8 +47,8 @@ dispatchJobSynchroniseAvs numIterations epoch iteration pause
 
 dispatchJobSynchroniseAvsId :: AvsPersonId -> Maybe Day -> JobHandler UniWorX
 dispatchJobSynchroniseAvsId apid pause = JobHandlerException $ do 
-  ok <- runDB $
-    getBy (UniqueUserAvsId apid) >>= \case
+  ok <- runDB $ getBy (UniqueUserAvsId apid) >>= 
+    \case
       (Just Entity{entityVal=UserAvs{userAvsUser=uid}}) -> do -- known user 
         workJobSychronizeAvs uid pause
         return True