From 19daf3fca40d99dd305a75e10dcaa8fbc734598b Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 16 Oct 2010 21:50:33 -0400
Subject: [PATCH] oops, should commit descriptions!

---
 Commands.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Commands.hs b/Commands.hs
index 4346a35e22..af6b5aad78 100644
--- a/Commands.hs
+++ b/Commands.hs
@@ -213,7 +213,7 @@ describeCmd description = do
 	u <- getUUID g
 	describeUUID u description
 	log <- uuidLog
-	gitAdd log Nothing -- all logs are committed at end
+	gitAdd log $ Just $ "description for UUID " ++ (show u)
 	liftIO $ putStrLn "description set"
 
 {- Updates the LocationLog when a key's presence changes. -}