diff options
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 |