init: Make description an optional parameter.

This commit is contained in:
Joey Hess 2011-08-29 14:13:38 -04:00
parent b2c5639dcc
commit d1154d0837
3 changed files with 4 additions and 7 deletions

View file

@ -7,7 +7,7 @@
module Command.Init where module Command.Init where
import Control.Monad (when) import Control.Monad
import Command import Command
import qualified Annex import qualified Annex
@ -17,15 +17,13 @@ import Init
command :: [Command] command :: [Command]
command = [standaloneCommand "init" paramDesc seek command = [standaloneCommand "init" paramDesc seek
"initialize git-annex with repository description"] "initialize git-annex"]
seek :: [CommandSeek] seek :: [CommandSeek]
seek = [withWords start] seek = [withWords start]
start :: CommandStartWords start :: CommandStartWords
start ws = do start ws = do
when (null description) $
error "please specify a description of this repository\n"
showStart "init" description showStart "init" description
next $ perform description next $ perform description
where where

1
debian/changelog vendored
View file

@ -3,6 +3,7 @@ git-annex (3.20110820) UNRELEASED; urgency=low
* Set EMAIL when running test suite so that git does not need to be * Set EMAIL when running test suite so that git does not need to be
configured first. Closes: #638998 configured first. Closes: #638998
* The wget command will now be used in preference to curl, if available. * The wget command will now be used in preference to curl, if available.
* init: Make description an optional parameter.
-- Joey Hess <joeyh@debian.org> Tue, 23 Aug 2011 13:41:01 -0400 -- Joey Hess <joeyh@debian.org> Tue, 23 Aug 2011 13:41:01 -0400

View file

@ -119,9 +119,7 @@ Many git-annex commands will stage changes for later `git commit` by you.
Use this to undo an unlock command if you don't want to modify Use this to undo an unlock command if you don't want to modify
the files, or have made modifications you want to discard. the files, or have made modifications you want to discard.
* init description * init [description]
Initializes git-annex with a description of the git repository.
Until a repository (or one of its remotes) has been initialized, Until a repository (or one of its remotes) has been initialized,
git-annex will refuse to operate on it, to avoid accidentially git-annex will refuse to operate on it, to avoid accidentially