revert debugging code

from commit 63e37b0beb

Annex.hs

@@ -215,7 +215,6 @@ new :: Git.Repo -> IO AnnexState
 new r = do
 	r' <- Git.Config.read =<< Git.relPath r
 	let c = extractGitConfig r'
-	print =<< fixupRepo r' c
 	newState c =<< fixupRepo r' c
 
 {- Performs an action in the Annex monad from a starting state,

Utility/Process.hs

@@ -277,7 +277,7 @@ processHandle (_, _, _, pid) = pid
 
 -- | Shows the command that a CreateProcess will run.
 showCmd :: CreateProcess -> String
-showCmd p = go (cmdspec p) ++ " " ++ show (env p)
+showCmd = go . cmdspec
   where
 	go (ShellCommand s) = s
 	go (RawCommand c ps) = c ++ " " ++ show ps