chore: fix constructor names
This commit is contained in:
parent
f39de71c02
commit
3c4e6b62fb
@ -321,8 +321,8 @@ postAdminTestR = do
|
||||
<dl .deflist>
|
||||
<dt .deflist__dt> appJobCronInterval
|
||||
<dd .deflist__dd>#{tshow appJobCronInterval}
|
||||
<dt .deflist__dt> appUserDbSyncWithin
|
||||
<dd .deflist__dd>#{tshow appUserdbSyncWithin}
|
||||
<dt .deflist__dt> appUserSyncWithin
|
||||
<dd .deflist__dd>#{tshow appUserSyncWithin}
|
||||
<dt .deflist__dt> appSynchroniseAvsUsersWithin
|
||||
<dd .deflist__dd>#{tshow appSynchroniseAvsUsersWithin}
|
||||
|]
|
||||
|
||||
@ -493,7 +493,7 @@ handleJobs' wNum = C.mapM_ $ \jctl -> hoist delimitInternalState . withJobWorker
|
||||
, Exc.Handler $ \case
|
||||
MailNotAvailable -> return $ Right ()
|
||||
e -> return . Left $ SomeException e
|
||||
, Exc.Handler $ \SynchroniseUserdbNoLdap -> return $ Right () -- TODO
|
||||
, Exc.Handler $ \SynchroniseUserdbNoUserdb -> return $ Right () -- TODO
|
||||
#endif
|
||||
, Exc.Handler $ \(e :: SomeException) -> return $ Left e
|
||||
] . fmap Right
|
||||
|
||||
Reference in New Issue
Block a user