summaryrefslogtreecommitdiff
path: root/Command/Init.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-11-07 12:47:41 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-11-07 12:47:41 -0400
commit41eecb4601896f7ece2151ff79775dd591e91b37 (patch)
tree871b08db9a1f9e4bcf657f00f3030d2f944dae3d /Command/Init.hs
parentaae0417d94c4ae81d28f2301bc1fac61d4f499a4 (diff)
Bugfix: In the past two releases, git-annex init has written the uuid.log in the wrong format, with the UUID and description flipped.
This is my own damn fault for not making UUID a real type, and then relying on the type checker to ensure my refactoring was correct -- which it wasn't! I should probably add code to clean up bogus entries in the uuid.log, but right now I want to get the fix out there to prevent people experiencing this bug. I should also make UUID a real data type.
Diffstat (limited to 'Command/Init.hs')
-rw-r--r--Command/Init.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Command/Init.hs b/Command/Init.hs
index 69cdc8e8a..e2a6eb7b0 100644
--- a/Command/Init.hs
+++ b/Command/Init.hs
@@ -30,5 +30,6 @@ start ws = do
perform :: String -> CommandPerform
perform description = do
initialize
- getUUID >>= describeUUID description
+ u <- getUUID
+ describeUUID u description
next $ return True