diff options
-rw-r--r-- | bbcode/src/Text/BBCode.hs | 2 |
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] | |||
64 | bbcode t = fmap dom $ first LexerError (parseOnly (many token <* endOfInput) t) >>= first TreeError . rose | 64 | bbcode 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 |
67 | data TreeError = MismatchedTags Text Text -- ^ Closing tags does not match opening tags | 67 | data 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 | ||