diff --git a/messages/de.msg b/messages/de.msg index 99220e436..0c7147ecd 100644 --- a/messages/de.msg +++ b/messages/de.msg @@ -63,7 +63,7 @@ SheetHint: Hinweis SheetHintFrom: Hinweis ab SheetSolution: Lösung SheetSolutionFrom: Lösung ab -SheetMarking: Korrekturhinweise +SheetMarking: Hinweise für Korrektoren SheetType: Bewertung SheetVisibleFrom: Sichtbar ab diff --git a/src/Handler/Sheet.hs b/src/Handler/Sheet.hs index 2dfe98535..6e778ecd6 100644 --- a/src/Handler/Sheet.hs +++ b/src/Handler/Sheet.hs @@ -111,11 +111,11 @@ makeSheetForm msId template = identForm FIDsheet $ \html -> do (sfActiveFrom <$> template) <*> areq utcTimeField (fslI MsgSheetActiveTo) (sfActiveTo <$> template) <*> aopt (multiFileField $ oldFileIds SheetExercise) (fsb "Aufgabenstellung") (sfSheetF <$> template) - <*> aopt utcTimeField (fslpI MsgSheetHintFrom "Datum, sonst nur Korrektoren" + <*> aopt utcTimeField (fslpI MsgSheetHintFrom "Datum, sonst nur für Korrektoren" & setTooltip "Ohne Datum nie für Teilnehmer sichtbar, Korrektoren können diese Dateien immer herunterladen") (sfHintFrom <$> template) <*> aopt (multiFileField $ oldFileIds SheetHint) (fslI MsgSheetHint) (sfHintF <$> template) - <*> aopt utcTimeField (fslpI MsgSheetSolutionFrom "Datum, sonst nur Korrektoren" + <*> aopt utcTimeField (fslpI MsgSheetSolutionFrom "Datum, sonst nur für Korrektoren" & setTooltip "Ohne Datum nie für Teilnehmer sichtbar, Korrektoren können diese Dateien immer herunterladen") (sfSolutionFrom <$> template) <*> aopt (multiFileField $ oldFileIds SheetSolution) (fslI MsgSheetSolution) (sfSolutionF <$> template)