summaryrefslogtreecommitdiff
path: root/test.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-01-25 21:49:04 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-01-25 21:49:04 -0400
commit082b022f9ae56b1446b6607cf7851cd4f1d4f904 (patch)
tree4712d36e841bca351c9aa68a911c4fb82188b4c1 /test.hs
parent109a719b03dbeb70eb317be17f7e18567efa9dac (diff)
successfully split Annex and AnnexState out of TypeInternals
Diffstat (limited to 'test.hs')
-rw-r--r--test.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/test.hs b/test.hs
index b8b264f0c..2528e6398 100644
--- a/test.hs
+++ b/test.hs
@@ -28,6 +28,7 @@ import qualified GitRepo as Git
import qualified Locations
import qualified Utility
import qualified TypeInternals
+import qualified Types
import qualified GitAnnex
import qualified LocationLog
import qualified UUID
@@ -416,7 +417,7 @@ git_annex command params = do
-- Runs an action in the current annex. Note that shutdown actions
-- are not run; this should only be used for actions that query state.
-annexeval :: TypeInternals.Annex a -> IO a
+annexeval :: Types.Annex a -> IO a
annexeval a = do
g <- Git.repoFromCwd
g' <- Git.configRead g