diff --git a/src/Foundation.hs b/src/Foundation.hs index d7b1060ae..05b086ed0 100644 --- a/src/Foundation.hs +++ b/src/Foundation.hs @@ -1162,6 +1162,8 @@ siteLayout' headingOverride widget = do isModal <- hasCustomHeader HeaderIsModal + primaryLanguage <- unsafeHead . Text.splitOn "-" <$> selectLanguage appLanguages + mcurrentRoute <- getCurrentRoute -- Get the breadcrumbs, as defined in the YesodBreadcrumbs instance. diff --git a/templates/course.hamlet b/templates/course.hamlet index 4fc2f9366..6f4b83866 100644 --- a/templates/course.hamlet +++ b/templates/course.hamlet @@ -1,94 +1,93 @@ $newline never -
-
-
Fakultät/Institut +
+
Fakultät/Institut +
+
+ #{schoolName} + + $maybe descr <- courseDescription course +
_{MsgCourseDescription}
- #{schoolName} + #{descr} - $maybe descr <- courseDescription course -
_{MsgCourseDescription} + $with numlecs <- length lecturers + $if numlecs /= 0 + $if numlecs > 1 +
_{MsgLecturersFor} + $else +
_{MsgLecturerFor}
- #{descr} - - $with numlecs <- length lecturers - $if numlecs /= 0 - $if numlecs > 1 -
_{MsgLecturersFor} - $else -
_{MsgLecturerFor} -
-
-