From c33313c50b1a9424dd20e6e9995c46d60a48e540 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 2 Nov 2011 14:24:44 -0400
Subject: tweak

---
 Command/Init.hs | 3 +--
 1 file changed, 1 insertion(+), 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
-- 
cgit v1.2.3