This commit is contained in:
Joey Hess 2019-06-05 12:20:11 -04:00
parent 6e51b9ae88
commit 0b5cc89687
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -27,7 +27,7 @@ data CommandCheck = CommandCheck { idCheck :: Int, runCheck :: Annex () }
type CommandSeek = Annex () type CommandSeek = Annex ()
{- d. The start stage is run before anything is printed about the {- d. The start stage is run before anything is printed about the
- command, is passed some input, and can early abort it - command, is passed some input, and can early abort it
- if the input does not make sense. It should run quickly and - if nothing needs to be done. It should run quickly and
- should not modify Annex state. -} - should not modify Annex state. -}
type CommandStart = Annex (Maybe CommandPerform) type CommandStart = Annex (Maybe CommandPerform)
{- e. The perform stage is run after a message is printed about the command {- e. The perform stage is run after a message is printed about the command