summaryrefslogtreecommitdiff
path: root/Remote/Git.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-03-29 14:55:59 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-03-29 14:55:59 -0400
commit0a4c610b4fd78f7d1589117cb723d7d8c15c120c (patch)
tree21682bc0b6314d1f47b539cbecbd80794fed2020 /Remote/Git.hs
parent05751d55cd8002e6a2a2afc520622fb6697472e3 (diff)
initremote works
Diffstat (limited to 'Remote/Git.hs')
-rw-r--r--Remote/Git.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs
index b686e47af..2d7a0c8ff 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -31,7 +31,11 @@ import Ssh
import Config
remote :: RemoteType Annex
-remote = RemoteType { typename = "git", generator = gen }
+remote = RemoteType {
+ typename = "git",
+ generator = gen,
+ setup = error "not supported"
+}
gen :: Annex (RemoteGenerator Annex)
gen = do
@@ -68,8 +72,7 @@ genRemote r = do
removeKey = dropKey r,
hasKey = inAnnex r,
hasKeyCheap = not (Git.repoIsUrl r),
- config = Nothing,
- setup = \_ -> return ()
+ config = Nothing
}
{- Tries to read the config for a specified remote, updates state, and