diff --git a/messages/uniworx/utils/navigation/menu/de-de-formal.msg b/messages/uniworx/utils/navigation/menu/de-de-formal.msg index 866c86c8b..e34ad1d39 100644 --- a/messages/uniworx/utils/navigation/menu/de-de-formal.msg +++ b/messages/uniworx/utils/navigation/menu/de-de-formal.msg @@ -1,4 +1,4 @@ -# SPDX-FileCopyrightText: 2022 Gregor Kleen ,Sarah Vaupel ,Steffen Jost ,Steffen Jost ,Winnie Ros +# SPDX-FileCopyrightText: 2022-25 Gregor Kleen ,Sarah Vaupel ,Steffen Jost ,Steffen Jost ,Winnie Ros ,Steffen Jost # # SPDX-License-Identifier: AGPL-3.0-or-later @@ -123,7 +123,6 @@ MenuLanguage: Sprache MenuQualifications: Qualifikationen MenuLms !ident-ok: E‑Learning -MenuLmsEdit: Bearbeiten E‑Learning MenuLmsUser: Benutzerqualifikationen MenuLmsUserSchool: Bereichs Benutzerqualifikationen MenuLmsUserAll: Alle Benutzerqualifikationen diff --git a/messages/uniworx/utils/navigation/menu/en-eu.msg b/messages/uniworx/utils/navigation/menu/en-eu.msg index eaf59831d..5eaf4e48d 100644 --- a/messages/uniworx/utils/navigation/menu/en-eu.msg +++ b/messages/uniworx/utils/navigation/menu/en-eu.msg @@ -1,4 +1,4 @@ -# SPDX-FileCopyrightText: 2022 Gregor Kleen ,Sarah Vaupel ,Steffen Jost ,Winnie Ros +# SPDX-FileCopyrightText: 2022-25 Gregor Kleen ,Sarah Vaupel ,Steffen Jost ,Winnie Ros ,Steffen Jost # # SPDX-License-Identifier: AGPL-3.0-or-later @@ -123,7 +123,6 @@ MenuLanguage: Language MenuQualifications: Qualifications MenuLms: E‑learning -MenuLmsEdit: Edit e‑learning MenuLmsUser: User Qualifications MenuLmsUserSchool: Institute User Qualifications MenuLmsUserAll: All User Qualifications diff --git a/routes b/routes index 469524dbb..7cffd79ba 100644 --- a/routes +++ b/routes @@ -289,7 +289,6 @@ /lms LmsAllR GET POST /lms/#SchoolId LmsSchoolR GET /lms/#SchoolId/#QualificationShorthand LmsR GET POST -/lms/#SchoolId/#QualificationShorthand/edit LmsEditR GET POST -- new V2 LMS Interface /lms/#SchoolId/#QualificationShorthand/learners LmsLearnersR GET /lms/#SchoolId/#QualificationShorthand/learners/direct LmsLearnersDirectR GET !token -- LMS diff --git a/src/Foundation/Navigation.hs b/src/Foundation/Navigation.hs index d6171f120..42e00cbd1 100644 --- a/src/Foundation/Navigation.hs +++ b/src/Foundation/Navigation.hs @@ -197,7 +197,6 @@ breadcrumb (LmsSchoolR ssh ) = useRunDB . maybeT (i18nCrumb MsgBrea breadcrumb (LmsR ssh qsh) = useRunDB . maybeT (i18nCrumb MsgBreadcrumbCourse . Just $ LmsSchoolR ssh) $ do guardM . lift . existsBy $ SchoolQualificationShort ssh qsh return (CI.original qsh, Just $ LmsSchoolR ssh) -breadcrumb (LmsEditR ssh qsh) = i18nCrumb MsgMenuLmsEdit $ Just $ LmsR ssh qsh -- v2 breadcrumb (LmsLearnersR ssh qsh) = i18nCrumb MsgMenuLmsLearners $ Just $ LmsR ssh qsh breadcrumb (LmsLearnersDirectR ssh qsh) = i18nCrumb MsgMenuLmsLearners $ Just $ LmsLearnersR ssh qsh -- never displayed, TypedContent @@ -2431,7 +2430,7 @@ pageActions (LmsR sid qsh) = return ] } , NavPageActionSecondary { - navLink = defNavLink MsgMenuLmsEdit $ LmsEditR sid qsh + navLink = defNavLink MsgMenuQualificationEdit $ QualificationEditR sid qsh } -- , NavPageActionSecondary { -- navLink = defNavLink MsgMenuLmsFake $ LmsFakeR sid qsh diff --git a/src/Handler/LMS.hs b/src/Handler/LMS.hs index 923a41623..a46896064 100644 --- a/src/Handler/LMS.hs +++ b/src/Handler/LMS.hs @@ -10,7 +10,6 @@ module Handler.LMS , getLmsSchoolR , getLmsR , postLmsR , getLmsIdentR - , getLmsEditR , postLmsEditR -- V2 , getLmsLearnersR , getLmsLearnersDirectR , getLmsReportR , postLmsReportR @@ -207,12 +206,6 @@ mkLmsAllTable isAdmin lmsDeletionDays = do dbTable resultDBTableValidator resultDBTable - -getLmsEditR, postLmsEditR :: SchoolId -> QualificationShorthand -> Handler Html -getLmsEditR = postLmsEditR -postLmsEditR = error "TODO: STUB" - - data LmsTableCsv = LmsTableCsv -- L..T..C.. -> ltc.. { ltcDisplayName :: UserDisplayName , ltcEmail :: UserEmail