From f637ccd3bf9c955b8e92e6f759556bfcb8a33d83 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 28 Jul 2022 11:27:27 -0700
Subject: MediaWiki reader: allow HTML comment after row start.

Closes #8110.
---
 src/Text/Pandoc/Readers/MediaWiki.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs
index 2dc289f18..0fdfa8b84 100644
--- a/src/Text/Pandoc/Readers/MediaWiki.hs
+++ b/src/Text/Pandoc/Readers/MediaWiki.hs
@@ -265,7 +265,10 @@ tableEnd = try $ guardColumnOne *> skipSpaces *> sym "|}"
 
 rowsep :: PandocMonad m => MWParser m ()
 rowsep = try $ guardColumnOne *> skipSpaces *> sym "|-" <*
-               many (char '-') <* optional parseAttrs <* blanklines
+               many (char '-') <* optional parseAttrs
+                               <* skipSpaces
+                               <* skipMany htmlComment
+                               <* blanklines
 
 cellsep :: PandocMonad m => MWParser m ()
 cellsep = try $ do
-- 
cgit v1.2.3