aboutsummaryrefslogtreecommitdiff
path: root/bbcode/src/Text
diff options
context:
space:
mode:
Diffstat (limited to 'bbcode/src/Text')
-rw-r--r--bbcode/src/Text/BBCode.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/bbcode/src/Text/BBCode.hs b/bbcode/src/Text/BBCode.hs
index 2e3a753..6fef446 100644
--- a/bbcode/src/Text/BBCode.hs
+++ b/bbcode/src/Text/BBCode.hs
@@ -64,7 +64,7 @@ bbcode :: Text -> Either BBCodeError [DomTree]
64bbcode t = fmap dom $ first LexerError (parseOnly (many token <* endOfInput) t) >>= first TreeError . rose 64bbcode t = fmap dom $ first LexerError (parseOnly (many token <* endOfInput) t) >>= first TreeError . rose
65 65
66-- | Errors in input encountered during parsing of lexed token-stream 66-- | Errors in input encountered during parsing of lexed token-stream
67data TreeError = MismatchedTags Text Text -- ^ Closing tags does not match opening tags 67data TreeError = MismatchedTags Text Text -- ^ Closing tags label does not match opening tags
68 | ImbalancedTags Text -- ^ We found an extraneous closing tag 68 | ImbalancedTags Text -- ^ We found an extraneous closing tag
69 deriving (Show, Eq, Generic, Typeable) 69 deriving (Show, Eq, Generic, Typeable)
70 70