summaryrefslogtreecommitdiff
path: root/Command/Describe.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Describe.hs')
-rw-r--r--Command/Describe.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Command/Describe.hs b/Command/Describe.hs
index 57f884e03..2ad3e01ee 100644
--- a/Command/Describe.hs
+++ b/Command/Describe.hs
@@ -11,7 +11,6 @@ import Command
import qualified Remote
import UUID
import Messages
-import qualified Command.Init
command :: [Command]
command = [repoCommand "describe" (paramPair paramRemote paramDesc) seek
@@ -34,4 +33,4 @@ start ws = notBareRepo $ do
perform :: UUID -> String -> CommandPerform
perform u description = do
describeUUID u description
- next $ Command.Init.cleanup
+ next $ return True