summaryrefslogtreecommitdiff
path: root/Command/Describe.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Describe.hs')
-rw-r--r--Command/Describe.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Describe.hs b/Command/Describe.hs
index 9e98a8143..dcabef7fb 100644
--- a/Command/Describe.hs
+++ b/Command/Describe.hs
@@ -29,9 +29,9 @@ start params = notBareRepo $ do
showStart "describe" name
u <- Remote.nameToUUID name
- return $ Just $ perform u description
+ next $ perform u description
perform :: UUID -> String -> CommandPerform
perform u description = do
describeUUID u description
- return $ Just $ Command.Init.cleanup
+ next $ Command.Init.cleanup