enabling rsync.net gcrypt repos

Still need to detect when the user is trying to create a repo
that already exists, and jump to the enabling code.
This commit is contained in:
Joey Hess 2013-09-26 23:28:25 -04:00
parent 538910a6f9
commit 1550759220
8 changed files with 71 additions and 38 deletions

View file

@ -22,6 +22,7 @@ import Logs.UUID
import Annex.UUID
import qualified Option
import qualified Annex
import Git.Remote
def :: [Command]
def = [noCommit $ withOptions [allrepos] $ command "list" paramPaths seek
@ -68,7 +69,6 @@ start l file (key, _) = do
liftIO $ putStrLn $ format (map (\(u, _, t) -> (t, S.member u ls)) l) file
stop
type RemoteName = String
type Present = Bool
header :: [(RemoteName, TrustLevel)] -> String