split out three modules from Git
Constructors and configuration make sense in separate modules. A separate Git.Types is needed to avoid cycles.
This commit is contained in:
parent
46588674b0
commit
13fff71f20
20 changed files with 349 additions and 285 deletions
6
test.hs
6
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
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue