From 04dc5aed10b133010116778d7f6153367fae678c Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Wed, 16 May 2012 06:43:13 +0000
Subject: [PATCH] explicit imports for Matching

---
 hledger-lib/Hledger/Data/Query.hs | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/hledger-lib/Hledger/Data/Query.hs b/hledger-lib/Hledger/Data/Query.hs
index d3bcc5339..3bd30c40b 100644
--- a/hledger-lib/Hledger/Data/Query.hs
+++ b/hledger-lib/Hledger/Data/Query.hs
@@ -5,7 +5,17 @@ Currently used only by hledger-web.
 
 -}
 
-module Hledger.Data.Query
+module Hledger.Data.Query (
+  Matcher(..),
+  matcherIsNull,
+  matcherIsStartDateOnly,
+  matcherStartDate,
+  matchesTransaction,
+  matchesPosting,
+  inAccount,
+  inAccountMatcher,
+  tests_Hledger_Data_Query
+)
 where
 import Data.Either
 import Data.List
@@ -176,9 +186,9 @@ parseBool s = s `elem` truestrings
 truestrings :: [String]
 truestrings = ["1","t","true"]
 
--- | Convert a match expression to its inverse.
-negateMatcher :: Matcher -> Matcher
-negateMatcher =  MatchNot
+-- -- | Convert a match expression to its inverse.
+-- negateMatcher :: Matcher -> Matcher
+-- negateMatcher =  MatchNot
 
 -- | Does the match expression match this posting ?
 matchesPosting :: Matcher -> Posting -> Bool