consolidate under Hledger.Cli
This commit is contained in:
parent
0282aa4697
commit
6d18b8c0af
@ -19,7 +19,7 @@ import System.IO ( stderr, hFlush, hPutStrLn, hPutStr )
|
||||
#endif
|
||||
import System.IO.Error
|
||||
import Text.ParserCombinators.Parsec
|
||||
import Hledger.Utils (ledgerFromStringWithOpts)
|
||||
import Hledger.Cli.Utils (ledgerFromStringWithOpts)
|
||||
import qualified Data.Foldable as Foldable (find)
|
||||
|
||||
-- | Read ledger transactions from the terminal, prompting for each field,
|
||||
|
||||
@ -5,7 +5,7 @@ format, and print it on stdout. See the manual for more details.
|
||||
|
||||
module Hledger.Cli.Commands.Convert where
|
||||
import Hledger.Cli.Options (Opt(Debug))
|
||||
import Hledger.Version (versionstr)
|
||||
import Hledger.Cli.Version (versionstr)
|
||||
import Hledger.Data.Types (Ledger,AccountName,Transaction(..),Posting(..),PostingType(..))
|
||||
import Hledger.Data.Utils (strip, spacenonewline, restofline, parseWithCtx, assertParse, assertParseEqual)
|
||||
import Hledger.Data.Parse (someamount, emptyCtx, ledgeraccountname)
|
||||
|
||||
@ -50,7 +50,7 @@ import Paths_hledger_make (getDataFileName)
|
||||
#else
|
||||
import Paths_hledger (getDataFileName)
|
||||
#endif
|
||||
import Hledger.Utils (openBrowserOn)
|
||||
import Hledger.Cli.Utils (openBrowserOn)
|
||||
|
||||
-- import Debug.Trace
|
||||
-- strace :: Show a => a -> a
|
||||
|
||||
@ -47,9 +47,9 @@ import System.IO.UTF8
|
||||
import Hledger.Cli.Commands.All
|
||||
import Hledger.Data
|
||||
import Hledger.Cli.Options
|
||||
import Hledger.Tests
|
||||
import Hledger.Utils (withLedgerDo)
|
||||
import Hledger.Version (versionmsg, binaryfilename)
|
||||
import Hledger.Cli.Tests
|
||||
import Hledger.Cli.Utils (withLedgerDo)
|
||||
import Hledger.Cli.Version (versionmsg, binaryfilename)
|
||||
|
||||
main :: IO ()
|
||||
main = do
|
||||
|
||||
@ -7,7 +7,7 @@ module Hledger.Cli.Options
|
||||
where
|
||||
import System.Console.GetOpt
|
||||
import System.Environment
|
||||
import Hledger.Version (timeprogname)
|
||||
import Hledger.Cli.Version (timeprogname)
|
||||
import Hledger.Data.IO (myLedgerPath,myTimelogPath)
|
||||
import Hledger.Data.Utils
|
||||
import Hledger.Data.Types
|
||||
|
||||
@ -26,7 +26,7 @@ $ hledger -f sample.ledger balance o
|
||||
|
||||
-}
|
||||
|
||||
module Hledger.Tests
|
||||
module Hledger.Cli.Tests
|
||||
where
|
||||
import qualified Data.Map as Map
|
||||
import Test.HUnit.Tools (runVerboseTests)
|
||||
@ -36,7 +36,7 @@ import System.Time (ClockTime(TOD))
|
||||
import Hledger.Cli.Commands.All
|
||||
import Hledger.Data -- including testing utils in Hledger.Data.Utils
|
||||
import Hledger.Cli.Options
|
||||
import Hledger.Utils
|
||||
import Hledger.Cli.Utils
|
||||
|
||||
|
||||
-- | Run unit tests.
|
||||
@ -6,7 +6,7 @@ Hledger.Data.Utils.
|
||||
|
||||
-}
|
||||
|
||||
module Hledger.Utils
|
||||
module Hledger.Cli.Utils
|
||||
where
|
||||
import Control.Monad.Error
|
||||
import Hledger.Data
|
||||
@ -4,7 +4,7 @@ Version-related utilities. See the Makefile for details of our version
|
||||
numbering policy.
|
||||
-}
|
||||
|
||||
module Hledger.Version
|
||||
module Hledger.Cli.Version
|
||||
where
|
||||
import System.Info (os, arch)
|
||||
import Hledger.Data.Utils
|
||||
1
Makefile
1
Makefile
@ -32,7 +32,6 @@ MAIN=hledger.hs
|
||||
SOURCEFILES:= \
|
||||
$(MAIN) \
|
||||
[A-Z]*hs \
|
||||
Hledger/*hs \
|
||||
Hledger/Cli/*hs \
|
||||
Hledger/Cli/Commands/*hs \
|
||||
hledger-lib/*hs \
|
||||
|
||||
@ -51,11 +51,11 @@ executable hledger
|
||||
main-is: hledger.hs
|
||||
other-modules:
|
||||
Paths_hledger
|
||||
Hledger.Tests
|
||||
Hledger.Utils
|
||||
Hledger.Version
|
||||
Hledger.Cli.Main
|
||||
Hledger.Cli.Options
|
||||
Hledger.Cli.Tests
|
||||
Hledger.Cli.Utils
|
||||
Hledger.Cli.Version
|
||||
Hledger.Cli.Commands.Add
|
||||
Hledger.Cli.Commands.All
|
||||
Hledger.Cli.Commands.Balance
|
||||
@ -116,11 +116,11 @@ executable hledger
|
||||
|
||||
library
|
||||
exposed-modules:
|
||||
Hledger.Tests
|
||||
Hledger.Utils
|
||||
Hledger.Version
|
||||
Hledger.Cli.Main
|
||||
Hledger.Cli.Options
|
||||
Hledger.Cli.Tests
|
||||
Hledger.Cli.Utils
|
||||
Hledger.Cli.Version
|
||||
Hledger.Cli.Commands.Add
|
||||
Hledger.Cli.Commands.All
|
||||
Hledger.Cli.Commands.Balance
|
||||
|
||||
Loading…
Reference in New Issue
Block a user