From abd85afe5798a8f724a229c8043b7dbf0e36fac9 Mon Sep 17 00:00:00 2001 From: Steffen Jost Date: Thu, 25 Nov 2021 17:30:40 +0100 Subject: [PATCH] chore(settings): allow notls or none as smtptls setting for convenience --- src/Settings.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/Settings.hs b/src/Settings.hs index c9ab18286..39ce336c6 100644 --- a/src/Settings.hs +++ b/src/Settings.hs @@ -417,6 +417,8 @@ instance FromJSON LdapConf where Just spec | spec == "insecure" -> return $ Just Ldap.insecureTlsSettings | spec == "default" -> return $ Just Ldap.defaultTlsSettings + | spec == "none" -> return Nothing + | spec == "notls" -> return Nothing | null spec -> return Nothing Nothing -> return Nothing _otherwise -> fail "Could not parse LDAP TLSSettings"