From 3b90b9caa9de6b7900411588a709aec0a9a8b987 Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <>
Date: Wed, 28 Oct 2020 20:01:47 +0100
Subject: [PATCH] fix(profile): add missing fields to user update

---
 src/Handler/Profile.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Handler/Profile.hs b/src/Handler/Profile.hs
index 3061aa86f..46a98df0e 100644
--- a/src/Handler/Profile.hs
+++ b/src/Handler/Profile.hs
@@ -397,6 +397,9 @@ postProfileR = do
       update uid $
         [ UserDisplayName          =. stgDisplayName
         , UserScheduleView         =. stgScheduleView
+        , UserScheduleWeekTimeFrom =. stgScheduleWeekTimeFrom
+        , UserScheduleWeekTimeTo   =. stgScheduleWeekTimeTo
+        , UserScheduleWeekTimeslotLength =. stgScheduleWeekTimeslotLength
         , UserMaxFavourites        =. stgMaxFavourites
         , UserMaxFavouriteTerms    =. stgMaxFavouriteTerms
         , UserTheme                =. stgTheme