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.

This commit is contained in:
Joey Hess 2013-04-22 15:36:34 -04:00
parent 8861e270be
commit 9cb223a8b3
6 changed files with 24 additions and 10 deletions

View file

@ -15,6 +15,7 @@ import Assistant.NamedThread
import Assistant.Threads.WebApp
import Assistant.WebApp
import Assistant.Install
import Annex.Environment
import Utility.WebApp
import Utility.Daemon (checkDaemon)
import Init
@ -111,6 +112,7 @@ startNoRepo = do
-}
firstRun :: Maybe HostName -> IO ()
firstRun listenhost = do
checkEnvironmentIO
{- Without a repository, we cannot have an Annex monad, so cannot
- get a ThreadState. Using undefined is only safe because the
- webapp checks its noAnnex field before accessing the