Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

T.P.CSV: fix parsing of unquoted values.

Browse source 
Previously we didn't allow unescaped quotes in unquoted values,
but they are allowed. Closes #7112.
This commit is contained in:
John MacFarlane 2021-02-22 21:17:22 -08:00
parent 00e4bb51e4
commit f0a991a22b
2 changed files with 16 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Text/Pandoc/CSV.hs
View file

@ -68,8 +68,7 @@ escaped opts = try $
pCSVUnquotedCell :: CSVOptions -> Parser Text
pCSVUnquotedCell opts = T.pack <$>
many (satisfy (\c -> c /= csvDelim opts && c /= '\r' && c /= '\n'
&& c /= csvQuote opts))
many (satisfy (\c -> c /= csvDelim opts && c /= '\r' && c /= '\n'))
pCSVDelim :: CSVOptions -> Parser ()
pCSVDelim opts = do

15
test/command/7112.md Normal file
View file

@ -0,0 +1,15 @@
```
% pandoc -f rst
.. csv-table::
setting, ``echo PATH="path"``
^D
<table>
<tbody>
<tr class="odd">
<td>setting</td>
<td><code>echo PATH="path"</code></td>
</tr>
</tbody>
</table>
```