@@ -264,7 +264,7 @@ tableEnd = try $ guardColumnOne *> skipSpaces *> sym "|}"
265rowsep :: PandocMonad m => MWParser m ()
265rowsep :: PandocMonad m => MWParser m ()
266rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <*
266rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <*
267− optional parseAttr <* blanklines
267+ many (char '-') <* optional parseAttr <* blanklines
269cellsep :: PandocMonad m => MWParser m ()
269cellsep :: PandocMonad m => MWParser m ()
270cellsep = try $
270cellsep = try $