diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-12-13 15:05:07 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-12-13 15:06:49 -0400 |
| commit | 13fff71f2019ae098c3f8532ac2734cb1ab11498 (patch) | |
| tree | f37714c4089df4afac9bf9724c80757e5fd29e6f /Backend.hs | |
| parent | 46588674b081cd4ea5820680d8fc15c81ed175ad (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 'Backend.hs')
| -rw-r--r-- | Backend.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Backend.hs b/Backend.hs index 136c2eb7a..c7cb57440 100644 --- a/Backend.hs +++ b/Backend.hs @@ -21,6 +21,7 @@ import System.Posix.Files import Common.Annex import qualified Git +import qualified Git.Config import qualified Annex import Types.Key import qualified Types.Backend as B @@ -47,7 +48,7 @@ orderedList = do l' <- (lookupBackendName name :) <$> standard Annex.changeState $ \s -> s { Annex.backends = l' } return l' - standard = fromRepo $ parseBackendList . Git.configGet "annex.backends" "" + standard = fromRepo $ parseBackendList . Git.Config.get "annex.backends" "" parseBackendList [] = list parseBackendList s = map lookupBackendName $ words s |