diff options
Diffstat (limited to 'Command/Untrust.hs')
| -rw-r--r-- | Command/Untrust.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Untrust.hs b/Command/Untrust.hs index 311ec6eeb..ebe9c31b3 100644 --- a/Command/Untrust.hs +++ b/Command/Untrust.hs @@ -24,9 +24,9 @@ start :: CommandStartString start name = notBareRepo $ do showStart "untrust" name u <- Remote.nameToUUID name - return $ Just $ perform u + next $ perform u perform :: UUID -> CommandPerform perform uuid = do trustSet uuid UnTrusted - return $ Just $ return True + next $ return True |