summaryrefslogtreecommitdiff
path: root/Remote/Git.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/Git.hs')
-rw-r--r--Remote/Git.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs
index 68bd172e9..b686e47af 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -12,7 +12,7 @@ module Remote.Git (
import Control.Exception.Extensible
import Control.Monad.State (liftIO)
-import qualified Data.Map as Map
+import qualified Data.Map as M
import System.Cmd.Utils
import Control.Monad (filterM, liftM)
@@ -68,7 +68,6 @@ genRemote r = do
removeKey = dropKey r,
hasKey = inAnnex r,
hasKeyCheap = not (Git.repoIsUrl r),
- hasConfig = False,
config = Nothing,
setup = \_ -> return ()
}
@@ -77,7 +76,7 @@ genRemote r = do
- returns the updated repo. -}
tryGitConfigRead :: Git.Repo -> Annex Git.Repo
tryGitConfigRead r
- | not $ Map.null $ Git.configMap r = return r -- already read
+ | not $ M.null $ Git.configMap r = return r -- already read
| Git.repoIsSsh r = store $ onRemote r (pipedconfig, r) "configlist" []
| Git.repoIsUrl r = return r
| otherwise = store $ safely $ Git.configRead r