From 6c5360cbdf20821a97a0f109ea114e4772b001e6 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 22 Apr 2013 15:36:34 -0400 Subject: 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. --- Command/WebApp.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'Command') diff --git a/Command/WebApp.hs b/Command/WebApp.hs index 90abd4d27..0e0756901 100644 --- a/Command/WebApp.hs +++ b/Command/WebApp.hs @@ -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 -- cgit v1.2.3