fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

chore(qualifications): provide separate route for lms and qualifciations

Browse Source
This commit is contained in:
Steffen Jost 2023-01-27 15:57:48 +01:00
parent 01cc46c6e4
commit f0170f0774
3 changed files with 24 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
routes
View File

@ -259,17 +259,18 @@
-- !/*{CI FilePath} CryptoFileNameDispatchR GET !free -- Disabled until preliminary check for valid cID exists -- !/*{CI FilePath} CryptoFileNameDispatchR GET !free -- Disabled until preliminary check for valid cID exists
-- for users -- for users
/qualification QualificationAllR GET -- TODO repurpose /qualification QualificationAllR GET !free
/qualification/#SchoolId QualificationSchoolR GET -- TODO repurpose /qualification/#SchoolId QualificationSchoolR GET !free
/qualification/#SchoolId/#QualificationShorthand QualificationR GET -- TODO repurpose /qualification/#SchoolId/#QualificationShorthand QualificationR GET !free
-- /qualification/#CryptoUUIDUser/ -- maybe distingquish via URL?
-- SAP export -- SAP export
/qualifications/sap/direct QualificationSAPDirectR GET !token /qualifications/sap/direct QualificationSAPDirectR GET !token
-- OSIS CSV Export Demo -- OSIS CSV Export Demo
/lms LmsAllR GET POST !free -- TODO verify that this is ok /lms LmsAllR GET POST
/lms/#SchoolId LmsSchoolR GET !free -- TODO verify that this is ok /lms/#SchoolId LmsSchoolR GET
/lms/#SchoolId/#QualificationShorthand LmsR GET POST !free -- /lms/#SchoolId/#QualificationShorthand LmsR GET POST
/lms/#SchoolId/#QualificationShorthand/limit/#Int64/skip/#Int64 LmsLSR GET POST !free -- FIXME Pagination does not work here somehow /lms/#SchoolId/#QualificationShorthand/limit/#Int64/skip/#Int64 LmsLSR GET POST -- FIXME Pagination does not work here somehow
/lms/#SchoolId/#QualificationShorthand/edit LmsEditR GET POST /lms/#SchoolId/#QualificationShorthand/edit LmsEditR GET POST
/lms/#SchoolId/#QualificationShorthand/users LmsUsersR GET /lms/#SchoolId/#QualificationShorthand/users LmsUsersR GET
/lms/#SchoolId/#QualificationShorthand/users/direct LmsUsersDirectR GET -- development only /lms/#SchoolId/#QualificationShorthand/users/direct LmsUsersDirectR GET -- development only

14
src/Foundation/Navigation.hs
View File

@ -712,9 +712,21 @@ defaultLinks = fmap catMaybes . mapM runMaybeT $ -- Define the menu items of the
} }
, return NavHeader , return NavHeader
{ navHeaderRole = NavHeaderPrimary { navHeaderRole = NavHeaderPrimary
, navIcon = IconMenuLms , navIcon = IconMenuQualifications
, navLink = NavLink , navLink = NavLink
{ navLabel = MsgMenuQualifications { navLabel = MsgMenuQualifications
, navRoute = QualificationsAllR
, navAccess' = NavAccessTrue
, navType = NavTypeLink { navModal = False }
, navQuick' = mempty
, navForceActive = False
}
}
, return NavHeader
{ navHeaderRole = NavHeaderPrimary
, navIcon = IconMenuLms
, navLink = NavLink
{ navLabel = MsgMenuLms
, navRoute = LmsAllR , navRoute = LmsAllR
, navAccess' = NavAccessTrue , navAccess' = NavAccessTrue
, navType = NavTypeLink { navModal = False } , navType = NavTypeLink { navModal = False }

4
src/Utils/Icon.hs
View File

@ -86,6 +86,7 @@ data Icon
| IconMenuCorrections | IconMenuCorrections
| IconMenuExams | IconMenuExams
| IconMenuAdmin | IconMenuAdmin
| IconMenuQualification
| IconMenuLms | IconMenuLms
| IconPageActionPrimaryExpand | IconPageActionSecondary | IconPageActionPrimaryExpand | IconPageActionSecondary
| IconBreadcrumbSeparator | IconBreadcrumbSeparator
@ -168,7 +169,8 @@ iconText = \case
IconMenuCorrections -> "check" IconMenuCorrections -> "check"
IconMenuExams -> "poll-h" IconMenuExams -> "poll-h"
IconMenuAdmin -> "screwdriver" IconMenuAdmin -> "screwdriver"
IconMenuLms -> "graduation-cap" -- "award" "diploma" "file-certificate" IconMenuLms -> "tasks" -- "user-graduate" "laptop"
IconMenuQualification -> "graduation-cap" -- "award" "diploma" "file-certificate"
IconPageActionPrimaryExpand -> "bars" IconPageActionPrimaryExpand -> "bars"
IconPageActionSecondary -> "ellipsis-h" IconPageActionSecondary -> "ellipsis-h"
IconBreadcrumbSeparator -> "angle-right" IconBreadcrumbSeparator -> "angle-right"