1 files changed, 2 insertions, 2 deletions

diff --git a/bbcode/src/Text/BBCode/Lexer.hs b/bbcode/src/Text/BBCode/Lexer.hs
index 7171a0e..03f57d2 100644
--- a/bbcode/src/Text/BBCode/Lexer.hs
+++ b/bbcode/src/Text/BBCode/Lexer.hs
@@ -29,11 +29,11 @@ data BBToken = BBOpen Text [(Text, Maybe Text)] -- ^ Tag open with attributes
 token :: Parser BBToken
 -- ^ Tokenizer
 token = BBClose <$> ("[/" *> escapedText' [']'] <* "]")
-        <|> uncurry BBOpen <$> openTag
+        <|> uncurry BBOpen <$ "[" <*> openTag <* "]"
         <|> BBStr <$> escapedText ['[']
 
 openTag :: Parser (Text, [(Text, Maybe Text)])
-openTag = (,) <$ "[" <*> escapedText' [']', ' ', '='] <*> attrs' <* "]"
+openTag = (,) <$> escapedText' [']', ' ', '='] <*> attrs'
 
 attrs :: Parser [(Text, Maybe Text)]
 attrs = (:) <$> (namedAttr <|> plainValue) <* takeWhile isSpace <*> attrs'