Skip to content

Commit

Permalink
fix warnings/errors found by make stacktest
Browse files Browse the repository at this point in the history
  • Loading branch information
simonmichael committed Sep 30, 2017
1 parent ddb8e4b commit 5de51c9
Show file tree
Hide file tree
Showing 5 changed files with 1 addition and 21 deletions.
1 change: 0 additions & 1 deletion hledger-lib/Hledger/Read.hs
Expand Up @@ -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"
Expand Down
3 changes: 1 addition & 2 deletions hledger-ui/Hledger/UI/RegisterScreen.hs
Expand Up @@ -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
Expand Down Expand Up @@ -386,4 +385,4 @@ isBlankElement mel = ((rsItemDate . snd) <$> mel) == Just ""

rsCenterAndContinue ui = do
scrollSelectionToMiddle $ rsList $ aScreen ui
continue ui
continue ui
13 changes: 0 additions & 13 deletions hledger/Hledger/Cli/Commands/Checkdates.hs
@@ -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 (
Expand Down
1 change: 0 additions & 1 deletion hledger/Hledger/Cli/Main.hs
Expand Up @@ -51,7 +51,6 @@ import System.FilePath
import System.Process
import Text.Printf

import Hledger (ensureJournalFileExists, getCurrentDay, period_, interval_, queryFromOpts)
import Hledger.Cli


Expand Down
4 changes: 0 additions & 4 deletions hledger/bench/bench.hs
Expand Up @@ -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"
Expand Down

0 comments on commit 5de51c9

Please sign in to comment.