diff options
Diffstat (limited to 'Command/EnableRemote.hs')
-rw-r--r-- | Command/EnableRemote.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/EnableRemote.hs b/Command/EnableRemote.hs index ea606c284..977c80487 100644 --- a/Command/EnableRemote.hs +++ b/Command/EnableRemote.hs @@ -47,8 +47,8 @@ unknownNameError prefix = do perform :: RemoteType -> UUID -> R.RemoteConfig -> CommandPerform perform t u c = do - c' <- R.setup t u c - next $ cleanup u c' + (c', u') <- R.setup t (Just u) c + next $ cleanup u' c' cleanup :: UUID -> R.RemoteConfig -> CommandCleanup cleanup u c = do |