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