diff --git a/markup-parse.cabal b/markup-parse.cabal
--- a/markup-parse.cabal
+++ b/markup-parse.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name: markup-parse
-version: 0.1.0.0
+version: 0.1.0.1
 license: BSD-3-Clause
 license-file: LICENSE
 copyright: Copyright, Tony Day, 2023-
diff --git a/src/MarkupParse.hs b/src/MarkupParse.hs
--- a/src/MarkupParse.hs
+++ b/src/MarkupParse.hs
@@ -419,12 +419,12 @@
 emptyElem :: NameTag -> [Attr] -> Markup
 emptyElem n as = Markup [Node (OpenTag EmptyElemTag n as) []]
 
--- | Create a Markup element from a NameTag and attributes that wraps some 'Content'.
+-- | Create a Markup element from a NameTag and attributes that wraps some 'Content'. No escaping is performed.
 --
 -- >>> elementc "div" [] "content"
 -- Markup {elements = [Node {rootLabel = OpenTag StartTag "div" [], subForest = [Node {rootLabel = Content "content", subForest = []}]}]}
 elementc :: NameTag -> [Attr] -> ByteString -> Markup
-elementc n as bs = element n as (content bs)
+elementc n as bs = element n as (contentRaw bs)
 
 -- | Create a Markup element from a bytestring, escaping the usual characters.
 --