Skip to content

Commit

Permalink
fix haddock markup
Browse files Browse the repository at this point in the history
  • Loading branch information
friedbrice committed Jan 4, 2024
1 parent 3e01531 commit 9f3d4d0
Showing 1 changed file with 3 additions and 5 deletions.
8 changes: 3 additions & 5 deletions src/Data/StringVariants/NullableNonEmptyText.hs
Original file line number Diff line number Diff line change
Expand Up @@ -60,7 +60,7 @@ import Prelude
-- __NB:__ When using a version of Aeson prior to 2.2, you /must/ use @Maybe (NullableNonEmptyText n)@ if you want to allow missing or null fields to parse.
--
-- @
-- data Person = Person
-- data Person = Person
-- { name :: 'NonEmptyText' 50
-- , catchphrase :: 'NullableNonEmptyText' 500
-- }
Expand All @@ -75,10 +75,8 @@ import Prelude
--
-- These two JSON objects parses as @Person "Daniel" (mkNullableNonEmptyText "Yabba-Dabba Do!")@
--
-- @@@
-- {"name": "Daniel", catchphrase: "Yabba-Dabba Do!"}
-- {"name": "Daniel", catchphrase: " Yabba-Dabba Do! "}
-- @@@
-- > {"name": "Daniel", catchphrase: "Yabba-Dabba Do!"}
-- > {"name": "Daniel", catchphrase: " Yabba-Dabba Do! "}
--
-- Use 'nullableNonEmptyTextToMaybeNonEmptyText' to extract @Maybe (NonEmptyText n)@ from @NullableNonEmptyText n@.
newtype NullableNonEmptyText n = NullableNonEmptyText (Maybe (NonEmptyText n))
Expand Down

0 comments on commit 9f3d4d0

Please sign in to comment.