diff --git a/src/Foundation/Navigation.hs b/src/Foundation/Navigation.hs index 773b2c165..154c65e8c 100644 --- a/src/Foundation/Navigation.hs +++ b/src/Foundation/Navigation.hs @@ -2479,7 +2479,7 @@ pageActions PrintCenterR = do } } emailCenter = NavPageActionPrimary - { navLink = defNavLink MsgMenuMailCenter $ MailCenterR + { navLink = defNavLink MsgMenuMailCenter MailCenterR , navChildren = [] } dayLinks <- mapM toDayAck $ Map.toAscList dayMap