summaryrefslogtreecommitdiff
path: root/CmdLine.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-04-22 15:36:34 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-04-22 15:36:34 -0400
commit6c5360cbdf20821a97a0f109ea114e4772b001e6 (patch)
tree030a5613938276edb57e18a09063bfe4c4ed4905 /CmdLine.hs
parent8655ea7f8e853b7de4defbca2655b741362ecd21 (diff)
Detect systems that have no user name set in GECOS, and also don't have user.name set in git config, and put in a workaround so that commits to the git-annex branch (and the assistant) will still succeed despite git not liking the system configuration.
Diffstat (limited to 'CmdLine.hs')
-rw-r--r--CmdLine.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/CmdLine.hs b/CmdLine.hs
index 63d36c74c..050f119f1 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -24,6 +24,7 @@ import qualified Git
import qualified Git.AutoCorrect
import Annex.Content
import Annex.Ssh
+import Annex.Environment
import Command
type Params = [String]
@@ -39,6 +40,7 @@ dispatch fuzzyok allargs allcmds commonoptions fields header getgitrepo = do
Right g -> do
state <- Annex.new g
(actions, state') <- Annex.run state $ do
+ checkEnvironment
checkfuzzy
forM_ fields $ uncurry Annex.setField
sequence_ flags