From c65dc04e8ffd1b486e31342fb087b05fedfbe2f8 Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <sarah.vaupel@uniworx.de>
Date: Sun, 28 Jan 2024 20:05:28 +0100
Subject: [PATCH] chore: add missing AuthAzure case

---
 src/Utils/Users.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Utils/Users.hs b/src/Utils/Users.hs
index a2eeb32f6..7c35da5fb 100644
--- a/src/Utils/Users.hs
+++ b/src/Utils/Users.hs
@@ -20,6 +20,7 @@ nullaryPathPiece ''AuthenticationKind $ camelToPathPiece' 2
 
 mkAuthMode :: AuthenticationKind -> AuthenticationMode
 mkAuthMode AuthKindLDAP     = AuthLDAP
+mkAuthMode AuthKindAzure    = AuthAzure
 mkAuthMode AuthKindPWHash   = AuthPWHash ""
 mkAuthMode AuthKindNoLogin  = AuthNoLogin