fix warnings/errors found by make stacktest
This commit is contained in:
		
							parent
							
								
									ddb8e4b6f0
								
							
						
					
					
						commit
						5de51c9bad
					
				| @ -65,7 +65,6 @@ import qualified Hledger.Read.TimeclockReader as TimeclockReader | ||||
| import qualified Hledger.Read.CsvReader       as CsvReader | ||||
| import Hledger.Utils | ||||
| import Prelude hiding (getContents, writeFile) | ||||
| import Hledger.Utils.UTF8IOCompat (writeFile) | ||||
| 
 | ||||
| 
 | ||||
| journalEnvVar           = "LEDGER_FILE" | ||||
|  | ||||
| @ -31,7 +31,6 @@ import System.Console.ANSI | ||||
| 
 | ||||
| import Hledger | ||||
| import Hledger.Cli hiding (progname,prognameandversion) | ||||
| import Hledger.Cli.Commands.Add (add) | ||||
| import Hledger.UI.UIOptions | ||||
| -- import Hledger.UI.Theme | ||||
| import Hledger.UI.UITypes | ||||
| @ -386,4 +385,4 @@ isBlankElement mel = ((rsItemDate . snd) <$> mel) == Just "" | ||||
| 
 | ||||
| rsCenterAndContinue ui = do | ||||
|   scrollSelectionToMiddle $ rsList $ aScreen ui | ||||
|   continue ui | ||||
|   continue ui | ||||
|  | ||||
| @ -1,16 +1,3 @@ | ||||
| {- #!/usr/bin/env stack -} | ||||
| {- stack runghc --  | ||||
|     --ghc-arg='-main-is _main'  | ||||
|     --verbosity info | ||||
|     --package hledger-lib | ||||
|     --package hledger | ||||
|     --package here | ||||
| -} | ||||
| -- We could probably still allow running these command modules as scripts, if useful. | ||||
| --import Hledger.Cli.Utils (withJournalDo) | ||||
| --main :: IO () | ||||
| --main = getHledgerCliOpts checkdatesmode >>= flip withJournalDo checkdates | ||||
| 
 | ||||
| {-# LANGUAGE QuasiQuotes #-} | ||||
| 
 | ||||
| module Hledger.Cli.Commands.Checkdates ( | ||||
|  | ||||
| @ -51,7 +51,6 @@ import System.FilePath | ||||
| import System.Process | ||||
| import Text.Printf | ||||
| 
 | ||||
| import Hledger (ensureJournalFileExists, getCurrentDay, period_, interval_, queryFromOpts) | ||||
| import Hledger.Cli | ||||
| 
 | ||||
| 
 | ||||
|  | ||||
| @ -9,10 +9,6 @@ import System.Environment (getArgs, withArgs) | ||||
| import System.TimeIt      (timeItT) | ||||
| import Text.Printf | ||||
| import Hledger.Cli | ||||
| import Hledger.Cli.Commands.Balance | ||||
| import Hledger.Cli.Commands.Print | ||||
| import Hledger.Cli.Commands.Register | ||||
| import Hledger.Cli.Commands.Stats | ||||
| 
 | ||||
| -- sample journal file to use for benchmarks | ||||
| inputfile = "bench/10000x1000x10.journal" | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user