From 4022f5cb6144f161221a1e2d9d17d6f73162a266 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 29 Jul 2016 09:55:02 -0700 Subject: [PATCH] lib, web: fix some warnings after megaparsec change --- hledger-lib/Hledger/Read/CsvReader.hs | 2 +- hledger-web/Handler/AddForm.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger-lib/Hledger/Read/CsvReader.hs b/hledger-lib/Hledger/Read/CsvReader.hs index 5bde94f43..5de36ffc7 100644 --- a/hledger-lib/Hledger/Read/CsvReader.hs +++ b/hledger-lib/Hledger/Read/CsvReader.hs @@ -28,7 +28,7 @@ import Prelude.Compat hiding (getContents) import Control.Exception hiding (try) import Control.Monad import Control.Monad.Except -import Control.Monad.State.Strict (StateT, State, get, modify', evalStateT) +import Control.Monad.State.Strict (StateT, get, modify', evalStateT) -- import Test.HUnit import Data.Char (toLower, isDigit, isSpace) import Data.List.Compat diff --git a/hledger-web/Handler/AddForm.hs b/hledger-web/Handler/AddForm.hs index 6d0e48d60..80588c692 100644 --- a/hledger-web/Handler/AddForm.hs +++ b/hledger-web/Handler/AddForm.hs @@ -17,7 +17,7 @@ import qualified Data.List as L (head) -- qualified keeps dev & prod builds warn import Data.Text (append, pack, unpack) import qualified Data.Text as T import Data.Time.Calendar -import Text.Megaparsec (digitChar, eof, some, string, runParser, runParserT, ParseError, Dec) +import Text.Megaparsec (digitChar, eof, some, string, runParser, ParseError, Dec) import Hledger.Utils import Hledger.Data hiding (num)