From 0a4c610b4fd78f7d1589117cb723d7d8c15c120c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 29 Mar 2011 14:55:59 -0400 Subject: initremote works --- Remote/Git.hs | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'Remote/Git.hs') 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 -- cgit v1.2.3