aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2024-12-23 10:36:09 -0800
committerJohn MacFarlane <[email protected]>2024-12-23 10:36:09 -0800
commit3c0982c893d877c930349cd3bd7b2195979c36b2 (patch)
tree9c407f880130856c29730257ac47b31b1f4aff2f
parente122ca04b06b18eee2f8d3173c95cba2003234d5 (diff)
MediaWiki reader: allow empty quoted attributes.
Closes #10490.
-rw-r--r--src/Text/Pandoc/Readers/MediaWiki.hs2
-rw-r--r--test/command/10490.md50
2 files changed, 51 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs
index c74a5a47b..e7d6ea4cb 100644
--- a/src/Text/Pandoc/Readers/MediaWiki.hs
+++ b/src/Text/Pandoc/Readers/MediaWiki.hs
@@ -253,7 +253,7 @@ parseAttr = try $ do
skipMany spaceChar
char '='
skipMany spaceChar
- v <- (char '"' >> many1TillChar (satisfy (/='\n')) (char '"'))
+ v <- (char '"' >> manyTillChar (satisfy (/='\n')) (char '"'))
<|> many1Char (satisfy $ \c -> not (isSpace c) && c /= '|')
return (k,v)
diff --git a/test/command/10490.md b/test/command/10490.md
new file mode 100644
index 000000000..05143ef95
--- /dev/null
+++ b/test/command/10490.md
@@ -0,0 +1,50 @@
+```
+% pandoc -f mediawiki -t html
+{|class="wikitable" style="text-align: center;"
+|-
+!rowspan=3 style=""|Witness program version
+!colspan=4 style=""|Hash size
+|-
+!Mainnet
+!Testnet
+!Mainnet
+!Testnet
+|-
+|0||p2||QW||7Xh||T7n
+|-
+|1||p4||QY||7Xq||T7w
+|}
+^D
+<table>
+<thead>
+<tr>
+<th style=""><p>Witness program version</p></th>
+<th colspan="4" style=""><p>Hash size</p></th>
+</tr>
+</thead>
+<tbody>
+<tr>
+<td><p>Mainnet</p></td>
+<td><p>Testnet</p></td>
+<td><p>Mainnet</p></td>
+<td><p>Testnet</p></td>
+<td></td>
+</tr>
+<tr>
+<td><p>0</p></td>
+<td><p>p2</p></td>
+<td><p>QW</p></td>
+<td><p>7Xh</p></td>
+<td><p>T7n</p></td>
+</tr>
+<tr>
+<td><p>1</p></td>
+<td><p>p4</p></td>
+<td><p>QY</p></td>
+<td><p>7Xq</p></td>
+<td><p>T7w</p></td>
+</tr>
+</tbody>
+</table>
+
+```