init: When run in an already initalized repository, and without a description specified, don't delete the old description.

This commit is contained in:
Joey Hess 2011-11-12 15:42:52 -04:00
parent e9bfa8eaed
commit cea65b9e5b
2 changed files with 3 additions and 1 deletions

View file

@ -27,5 +27,5 @@ start ws = do
perform :: String -> CommandPerform
perform description = do
initialize (Just description)
initialize $ if null description then Nothing else Just description
next $ return True