summaryrefslogtreecommitdiff
path: root/test.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-12-13 15:05:07 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-12-13 15:06:49 -0400
commit13fff71f2019ae098c3f8532ac2734cb1ab11498 (patch)
treef37714c4089df4afac9bf9724c80757e5fd29e6f /test.hs
parent46588674b081cd4ea5820680d8fc15c81ed175ad (diff)
split out three modules from Git
Constructors and configuration make sense in separate modules. A separate Git.Types is needed to avoid cycles.
Diffstat (limited to 'test.hs')
-rw-r--r--test.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/test.hs b/test.hs
index 91c11873d..14994865f 100644
--- a/test.hs
+++ b/test.hs
@@ -25,6 +25,8 @@ import qualified Annex
import qualified Annex.UUID
import qualified Backend
import qualified Git
+import qualified Git.Config
+import qualified Git.Construct
import qualified Locations
import qualified Types.Backend
import qualified Types
@@ -496,8 +498,8 @@ git_annex command params = do
-- are not run; this should only be used for actions that query state.
annexeval :: Types.Annex a -> IO a
annexeval a = do
- g <- Git.repoFromCwd
- g' <- Git.configRead g
+ g <- Git.Construct.fromCwd
+ g' <- Git.Config.read g
s <- Annex.new g'
Annex.eval s a