summaryrefslogtreecommitdiff
path: root/Command/Init.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Init.hs')
-rw-r--r--Command/Init.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Command/Init.hs b/Command/Init.hs
index e2a6eb7b0..69cdc8e8a 100644
--- a/Command/Init.hs
+++ b/Command/Init.hs
@@ -30,6 +30,5 @@ start ws = do
perform :: String -> CommandPerform
perform description = do
initialize
- u <- getUUID
- describeUUID u description
+ getUUID >>= describeUUID description
next $ return True