aboutsummaryrefslogtreecommitdiff
path: root/Types/Command.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-13 00:45:27 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-13 00:45:27 -0400
commit7db480af0f944ca0e6c062cd1243c63ad7f878d1 (patch)
tree21d7efe0b866dd7db1a5396a842652f49c676e84 /Types/Command.hs
parent94554782894ec6c26da3b46312d5d1d16d596458 (diff)
whitespace fixes
Diffstat (limited to 'Types/Command.hs')
-rw-r--r--Types/Command.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Types/Command.hs b/Types/Command.hs
index 24413ebad..b652bdad5 100644
--- a/Types/Command.hs
+++ b/Types/Command.hs
@@ -22,9 +22,9 @@ data CommandCheck = CommandCheck { idCheck :: Int, runCheck :: Annex () }
- a list of start stage actions. -}
type CommandSeek = [String] -> Annex [CommandStart]
{- c. The start stage is run before anything is printed about the
- - command, is passed some input, and can early abort it
- - if the input does not make sense. It should run quickly and
- - should not modify Annex state. -}
+ - command, is passed some input, and can early abort it
+ - if the input does not make sense. It should run quickly and
+ - should not modify Annex state. -}
type CommandStart = Annex (Maybe CommandPerform)
{- d. The perform stage is run after a message is printed about the command
- being run, and it should be where the bulk of the work happens. -}