diff options
| author | John MacFarlane <[email protected]> | 2023-03-01 10:48:04 -0800 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2023-03-01 10:48:04 -0800 |
| commit | 52ef7cac7c2f01166a8382e5e7a50dd38be2fd75 (patch) | |
| tree | a7ce533ab2ae13ea38871fdf1cb953de67d17fc0 /src | |
| parent | 6b906879af8d6355c7998da439c57aae909e62c9 (diff) | |
Fix shadowing from last commit.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/CSV.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Text/Pandoc/CSV.hs b/src/Text/Pandoc/CSV.hs index b0ac2e3f1..d92f02ac6 100644 --- a/src/Text/Pandoc/CSV.hs +++ b/src/Text/Pandoc/CSV.hs @@ -80,10 +80,10 @@ pCSVUnquotedCell opts = T.pack <$> pCSVDelim :: CSVOptions -> Parser () pCSVDelim opts = do char (csvDelim opts) - let spaceChar = case csvDelim opts of - '\t' -> char ' ' - _ -> oneOf " \t" - unless (csvKeepSpace opts) $ skipMany spaceChar + let sp = case csvDelim opts of + '\t' -> char ' ' + _ -> oneOf " \t" + unless (csvKeepSpace opts) $ skipMany sp endline :: Parser () endline = do |
