diff --git a/src/Handler/Utils.hs b/src/Handler/Utils.hs index 1d3e63e9a..35faf6676 100644 --- a/src/Handler/Utils.hs +++ b/src/Handler/Utils.hs @@ -86,7 +86,7 @@ wrapMailto (original -> email) linkText mailtoHtml :: CI Text -> Html mailtoHtml email = wrapMailto email $ toHtml email --- | Prefix a message with a short cours id, +-- | Prefix a message with a short course id, -- eg. for window title bars, etc. -- This function should help to make this consistent everywhere prependCourseTitle :: (RenderMessage UniWorX msg) =>