From a9d56c51dcc727f8637b09a0e849372e75032f5e Mon Sep 17 00:00:00 2001
From: Steffen Jost <S.Jost@Fraport.de>
Date: Mon, 23 Oct 2023 09:57:57 +0000
Subject: [PATCH] fix(users): allow prefer postal setting for users with
 fraport department

---
 src/Handler/Profile.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Handler/Profile.hs b/src/Handler/Profile.hs
index 5c2acdd0a..39730ffd5 100644
--- a/src/Handler/Profile.hs
+++ b/src/Handler/Profile.hs
@@ -370,7 +370,7 @@ validateSettings User{..} = do
 
   userPrefersPostal' <- use _stgPrefersPostal
   guardValidation MsgUserPrefersPostalInvalid $
-    not $ userPrefersPostal' && postalNotSet
+    not $ userPrefersPostal' && (postalNotSet || isJust userCompanyDepartment)
 
   userPinPassword'  <- use _stgPinPassword
   let pinBad     = validCmdArgument =<< userPinPassword'