diff options
author | Joey Hess <joey@kitenet.net> | 2011-09-15 16:57:02 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-09-15 16:59:52 -0400 |
commit | 5ff04bf2afcc62d1762adbc1c2a0374952328c0f (patch) | |
tree | a2d6bfac942582573d71ffe394f1c867688f8024 /Command.hs | |
parent | 35145202d2e463569989b710ab5b87f6d9a8fdc1 (diff) |
tweak
Diffstat (limited to 'Command.hs')
-rw-r--r-- | Command.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Command.hs b/Command.hs index 6bd451a7e..08087a5a5 100644 --- a/Command.hs +++ b/Command.hs @@ -1,4 +1,4 @@ -{- git-annex commands +{- git-annex command infrastructure - - Copyright 2010 Joey Hess <joey@kitenet.net> - @@ -29,6 +29,7 @@ import Types.Key import Trust import LocationLog import Config +import Backend {- A command runs in four stages. - @@ -49,8 +50,6 @@ type CommandPerform = Annex (Maybe CommandCleanup) - returns the overall success/fail of the command. -} type CommandCleanup = Annex Bool -type BackendFile = (FilePath, Maybe (Backend Annex)) - data Command = Command { cmdusesrepo :: Bool, cmdname :: String, |