Trying to fix unusual and new haddock

src/Database/Esqueleto/Utils.hs

@@ -5,11 +5,11 @@ import Data.Foldable as F
 import Database.Esqueleto as E
 
 
-{-|
-  Description : Convenience for using @Esqueleto@,
-                intended to be imported qualified
-                just like Esqueleto
--}
+--
+-- Description : Convenience for using @Esqueleto@,
+--               intended to be imported qualified
+--               just like Esqueleto
+
 
 -- ezero = E.val (0 :: Int64)
 

src/Utils/Lens/TH.hs

@@ -6,7 +6,8 @@ import Control.Lens.Internal.FieldTH
 import Language.Haskell.TH
 
 -- import Control.Lens.Misc
-{-  NOTE: The code for lensRules_  and makeLenses_ was stolen from package lens-misc-0.0.2.0,
+{-
+    NOTE: The code for lensRules_  and makeLenses_ was stolen from package lens-misc-0.0.2.0,
     which was currently unavailable in our stack snapshot.
     See https://github.com/louispan/lens-misc
 -}
@@ -59,5 +60,5 @@ makeClassyFor_ :: String -> String -> Name -> DecsQ
 makeClassyFor_ clsName funName = makeFieldOptics (classyRulesFor_ clNamer)
     where
         clNamer :: ClassyNamer
-        -- clNamer _ = Just (clsName, funName) -- for newer versions >= 4.17
+        -- clNamer _ = Just (clsName, funName) {- for newer versions >= 4.17 =}
         clNamer _ = Just (mkName clsName, mkName funName)

templates/adminUser.hamlet

@@ -1,3 +1,5 @@
+<p>
+  <a href="mailto:#{userEmail}">#{userEmail}
 <form method=post action=@{AdminUserR uuid} enctype=#{formEnctype}>
   ^{formWidget}
   ^{submitButtonView}

templates/data-protection-de.hamlet

@@ -1,7 +1,7 @@
 <div .container>
   <section>
-    <h2>Stand
-    <h3>Version 0.91 vom 22.5.2018
+$#    <h2>Stand
+$#    <h3>Version 0.91 vom 22.5.2018
     <p>
       Die LMU unterliegt als Körperschaft des öffentlichen Rechts dem
       bayerischen Datenschutzgesetz, in einigen Bereichen dem Bundesdatenschutzgesetz,