Hinweise zur Sichtbarkeit von Übungsblatt-Dateien

src/Handler/Sheet.hs

@@ -564,10 +564,11 @@ handleSheetEdit tid ssh csh msId template dbAction = do
   actionUrl <- fromMaybe (CourseR tid ssh csh SheetNewR) <$> getCurrentRoute
   defaultLayout $ do
     setTitleI pageTitle
-    wrapForm formWidget def
-      { formAction = Just $ SomeRoute actionUrl
-      , formEncoding = formEnctype
-      }
+    let sheetEditForm = wrapForm formWidget def
+          { formAction = Just $ SomeRoute actionUrl
+          , formEncoding = formEnctype
+          }
+    $(i18nWidgetFile "sheet-edit")
 
 
 getSDelR, postSDelR :: TermId -> SchoolId -> CourseShorthand -> SheetName -> Handler Html

templates/sheet-edit/de.hamlet

@@ -0,0 +1,22 @@
+<section>
+  ^{sheetEditForm}
+
+<section>
+  <h2>Hinweise
+  <ul>
+    <li>
+      <p>
+        Reine Tutoren haben keinen Vorab Zugriff auf Musterlösungen.
+      <p>
+        Wenn reine Tutoren vorab Zugriff auf Musterlösungen erhalten sollen,
+        dann sind diese momentan als Korrektoren mit Anteil 0 einzutragen.
+    <li>
+      <p>
+        Korrektoren haben nur Zugriff auf das jeweilige Übungsblatt.
+      <p>
+        Auf andere Übungsblätter, bei denen jemand nicht als Korrektor
+        eingetragen ist, gibt es keinen Zugriff auf Lösungen.
+    <li>
+      <p>
+        Alle für diesen Kurs eingetragenen Dozenten und Assistenten
+        haben vollen Zugriff auf alle Dateien der Übungsblatter dieses Kurses.