diff --git a/messages/uniworx/de-de-formal.msg b/messages/uniworx/de-de-formal.msg index e47822fed..ff6ea9383 100644 --- a/messages/uniworx/de-de-formal.msg +++ b/messages/uniworx/de-de-formal.msg @@ -1270,6 +1270,7 @@ BreadcrumbExternalExamGrades: Prüfungsleistungen BreadcrumbExternalExamStaffInvite: Einladung zum Prüfer BreadcrumbParticipantsList: Kursteilnehmerlisten BreadcrumbParticipants: Kursteilnehmerliste +BreadcrumbStorageKey: Lokalen Schlüssel generieren ExternalExamEdit coursen@CourseName examn@ExamName: Bearbeiten: #{coursen}, #{examn} ExternalExamGrades coursen@CourseName examn@ExamName: Prüfungsleistungen: #{coursen}, #{examn} diff --git a/messages/uniworx/en-eu.msg b/messages/uniworx/en-eu.msg index e4b7cf356..8482e8153 100644 --- a/messages/uniworx/en-eu.msg +++ b/messages/uniworx/en-eu.msg @@ -1269,6 +1269,7 @@ BreadcrumbExternalExamGrades: Exam results BreadcrumbExternalExamStaffInvite: Invitation BreadcrumbParticipantsList: Lists of course participants BreadcrumbParticipants: Course participants +BreadcrumbStorageKey: Generate storage key ExternalExamEdit coursen examn: Edit: #{coursen}, #{examn} ExternalExamGrades coursen examn: Exam achievements: #{coursen}, #{examn} diff --git a/src/Application.hs b/src/Application.hs index e84ad6bb8..f61813796 100644 --- a/src/Application.hs +++ b/src/Application.hs @@ -124,6 +124,7 @@ import Handler.ExamOffice import Handler.Metrics import Handler.ExternalExam import Handler.Participants +import Handler.StorageKey -- This line actually creates our YesodDispatch instance. It is the second half diff --git a/src/Foundation.hs b/src/Foundation.hs index 8b5ffbf7c..eb7c1cca2 100644 --- a/src/Foundation.hs +++ b/src/Foundation.hs @@ -1837,6 +1837,8 @@ instance YesodBreadcrumbs UniWorX where breadcrumb CsvOptionsR = i18nCrumb MsgCsvOptions $ Just ProfileR breadcrumb LangR = i18nCrumb MsgMenuLanguage $ Just ProfileR + breadcrumb StorageKeyR = i18nCrumb MsgBreadcrumbStorageKey Nothing + breadcrumb TermShowR = i18nCrumb MsgMenuTermShow $ Just HomeR breadcrumb TermCurrentR = i18nCrumb MsgMenuTermCurrent $ Just TermShowR breadcrumb TermEditR = i18nCrumb MsgMenuTermCreate $ Just TermShowR