From 9c62c9ee8ca365ceea206c696d3596e46927391c Mon Sep 17 00:00:00 2001 From: Sarah Vaupel Date: Mon, 12 Dec 2022 01:22:41 +0100 Subject: [PATCH] feat(add-users): add page-action to add users from TUsersR --- src/Foundation/Navigation.hs | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/src/Foundation/Navigation.hs b/src/Foundation/Navigation.hs index de957e320..3d7d5c2cb 100644 --- a/src/Foundation/Navigation.hs +++ b/src/Foundation/Navigation.hs @@ -1815,6 +1815,17 @@ pageActions (CTutorialR tid ssh csh tutn TEditR) = return ] pageActions (CTutorialR tid ssh csh tutn TUsersR) = return [ NavPageActionPrimary + { navLink = NavLink + { navLabel = MsgMenuCourseAddMembers + , navRoute = CourseR tid ssh csh CAddUserR + , navAccess' = NavAccessTrue + , navType = NavTypeLink { navModal = True } + , navQuick' = navQuick NavQuickViewPageActionSecondary + , navForceActive = False + } + , navChildren = [] + } + , NavPageActionPrimary { navLink = NavLink { navLabel = MsgMenuTutorialComm , navRoute = CTutorialR tid ssh csh tutn TCommR