summaryrefslogtreecommitdiff
path: root/Command/InitRemote.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/InitRemote.hs')
-rw-r--r--Command/InitRemote.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/InitRemote.hs b/Command/InitRemote.hs
index e5d7a9039..4a89bed7c 100644
--- a/Command/InitRemote.hs
+++ b/Command/InitRemote.hs
@@ -46,7 +46,7 @@ start (name:ws) = ifM (isJust <$> findExisting name)
perform :: RemoteType -> String -> R.RemoteConfig -> CommandPerform
perform t name c = do
- (c', u) <- R.setup t Nothing Nothing c def
+ (c', u) <- R.setup t R.Init Nothing Nothing c def
next $ cleanup u name c'
cleanup :: UUID -> String -> R.RemoteConfig -> CommandCleanup