Update haddock

yesodweb · Dec 11, 2023 · bf5d1ff · bf5d1ff
1 parent f33387d
commit bf5d1ff
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/yesod-form/Yesod/Form/Option.hs b/yesod-form/Yesod/Form/Option.hs
@@ -23,7 +23,7 @@ import Yesod.Form.Fields
 --
 -- @example.hs
 -- > data UserRole = URSalesTeam | URSalesHead | URTechTeam | URTechHead
---
+-- >
 -- > instance PathPiece UserDepartment where
 -- >   toPathPiece = \case
 -- >     URSalesTeam -> "sales-team"
@@ -36,7 +36,7 @@ import Yesod.Form.Fields
 -- >     "tech-team" -> Just URTechTeam
 -- >     "tech-head" -> Just URTechHead
 -- >     _ -> Nothing
---
+-- >
 -- > userRoleOptions ::
 -- >   (MonadHandler m, RenderMessage (HandlerSite m) msg) => m (OptionList UserRole)
 -- > userRoleOptions = optionsFromList' userRoles toMsg