From 7e3e7720555894ac3755c38a36402ecaf2b754f6 Mon Sep 17 00:00:00 2001 From: Sarah Vaupel Date: Sun, 28 Jan 2024 12:45:44 +0100 Subject: [PATCH] chore(foundation): use multifunctional authenticate --- src/Foundation/Instances.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/Foundation/Instances.hs b/src/Foundation/Instances.hs index 79fefdccf..8ab8d9beb 100644 --- a/src/Foundation/Instances.hs +++ b/src/Foundation/Instances.hs @@ -139,9 +139,7 @@ instance YesodAuth UniWorX where setTitleI MsgLoginTitle $(widgetFile "login") - authenticate c@Creds{..} - | credsPlugin `elem` ["azureadv2", "uniworx_dev"] = UniWorX.oAuthenticate c - | otherwise = UniWorX.authenticate c + authenticate = UniWorX.authenticate authPlugins UniWorX{ appSettings' = AppSettings{..}, appLdapPool, appAuthPlugins } = appAuthPlugins ++ catMaybes [ flip campusLogin campusUserFailoverMode <$> appLdapPool