summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-14 14:50:46 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-14 14:50:46 -0400
commit1d628ff2380d1bec0c260bc19349c67360fa7a1f (patch)
tree19c56c3569cf01e478697e440d78ca9aefd7fdeb
parenta0c013605699a4b1509ba1b04b4522ac43f033c6 (diff)
comment
-rw-r--r--Commands.hs4
-rw-r--r--git-annex.hs3
2 files changed, 2 insertions, 5 deletions
diff --git a/Commands.hs b/Commands.hs
index 05ea65880..feb35d1fb 100644
--- a/Commands.hs
+++ b/Commands.hs
@@ -1,8 +1,6 @@
{- git-annex command line -}
-module Commands (
- argvToActions
-) where
+module Commands (argvToActions) where
import System.Console.GetOpt
import Control.Monad.State (liftIO)
diff --git a/git-annex.hs b/git-annex.hs
index 77dd29fac..78e875014 100644
--- a/git-annex.hs
+++ b/git-annex.hs
@@ -14,8 +14,7 @@ main = do
state <- start
tryRun state actions
-{- Processes each param in the list by dispatching the handler function
- - for the user-selection operation mode. Catches exceptions, not stopping
+{- Runs a list of Annex actions. Catches exceptions, not stopping
- if some error out, and propigates an overall error status at the end.
-
- This runs in the IO monad, not in the Annex monad. It seems that