@@ -290,7 +290,6 @@ orderedList = try $ do
290290bulletList :: GenParser Char ParserState Block
291291bulletList = try $ do
292292 begin "itemize"
293− spaces
294293 items <- many listItem
295294 end "itemize"
296295 spaces
@@ -299,7 +298,6 @@ bulletList = try $ do
299298definitionList :: GenParser Char ParserState Block
300299definitionList = try $ do
301300 begin "description"
302− spaces
303301 items <- many listItem
304302 end "description"
305303 spaces
@@ -761,7 +759,6 @@ math4 = try $ do
761759 name <- begin "displaymath" <|> begin "equation" <|> begin "equation*" <|>
762760 begin "gather" <|> begin "gather*" <|> begin "gathered" <|>
763761 begin "multline" <|> begin "multline*"
764− spaces
765762 manyTill anyChar (end name)
766763
767764math5 :: GenParser Char st String
@@ -772,7 +769,6 @@ math6 = try $ do
772769 name <- begin "eqnarray" <|> begin "eqnarray*" <|> begin "align" <|>
773770 begin "align*" <|> begin "alignat" <|> begin "alignat*" <|>
774771 begin "split" <|> begin "aligned" <|> begin "alignedat"
775− spaces
776772 res <- manyTill anyChar (end name)
777773 return $ filter (/= '&') res -- remove alignment codes
778774