Hledger.Data.Matching -> Hledger.Data.Query

This commit is contained in:
Simon Michael 2012-05-16 06:50:08 +00:00
parent c27707f578
commit 43d78398bb
4 changed files with 8 additions and 8 deletions

View File

@ -15,7 +15,7 @@ module Hledger.Data (
module Hledger.Data.Dates,
module Hledger.Data.Journal,
module Hledger.Data.Ledger,
module Hledger.Data.Matching,
module Hledger.Data.Query,
module Hledger.Data.Posting,
module Hledger.Data.TimeLog,
module Hledger.Data.Transaction,
@ -32,7 +32,7 @@ import Hledger.Data.Commodity
import Hledger.Data.Dates
import Hledger.Data.Journal
import Hledger.Data.Ledger
import Hledger.Data.Matching
import Hledger.Data.Query
import Hledger.Data.Posting
import Hledger.Data.TimeLog
import Hledger.Data.Transaction
@ -47,7 +47,7 @@ tests_Hledger_Data = TestList
,tests_Hledger_Data_Dates
,tests_Hledger_Data_Journal
,tests_Hledger_Data_Ledger
,tests_Hledger_Data_Matching
,tests_Hledger_Data_Query
,tests_Hledger_Data_Posting
,tests_Hledger_Data_TimeLog
,tests_Hledger_Data_Transaction

View File

@ -29,7 +29,7 @@ import Hledger.Data.Dates (nulldatespan)
import Hledger.Data.Transaction (journalTransactionWithDate,balanceTransaction)
import Hledger.Data.Posting
import Hledger.Data.TimeLog
import Hledger.Data.Matching
import Hledger.Data.Query
instance Show Journal where

View File

@ -20,7 +20,7 @@ import Hledger.Data.Account (nullacct)
import Hledger.Data.AccountName
import Hledger.Data.Journal
import Hledger.Data.Posting
import Hledger.Data.Matching
import Hledger.Data.Query
instance Show Ledger where

View File

@ -5,7 +5,7 @@ Currently used only by hledger-web.
-}
module Hledger.Data.Matching
module Hledger.Data.Query
where
import Data.Either
import Data.List
@ -273,8 +273,8 @@ compareMaybeDates Nothing (Just _) = LT
compareMaybeDates (Just _) Nothing = GT
compareMaybeDates (Just a) (Just b) = compare a b
tests_Hledger_Data_Matching :: Test
tests_Hledger_Data_Matching = TestList
tests_Hledger_Data_Query :: Test
tests_Hledger_Data_Query = TestList
[
"parseQuery" ~: do