From 52ef7cac7c2f01166a8382e5e7a50dd38be2fd75 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Wed, 1 Mar 2023 10:48:04 -0800 Subject: Fix shadowing from last commit. --- src/Text/Pandoc/CSV.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/Text') 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 -- cgit v1.2.3