make a pipeReadStrict, that properly waits on the process

Nearly everything that's reading from git is operating on a small
amount of output and has been switched to use that. Only pipeNullSplit
stuff continues using the lazy version that yields zombies.

Command/Uninit.hs

@@ -32,7 +32,7 @@ check = do
 		error "can only run uninit from the top of the git repository"
 	where
 		current_branch = Git.Ref . Prelude.head . lines <$> revhead
-		revhead = inRepo $ Git.Command.pipeRead 
+		revhead = inRepo $ Git.Command.pipeReadStrict
 			[Params "rev-parse --abbrev-ref HEAD"]
 
 seek :: [CommandSeek]

Command/Unused.hs

@@ -251,7 +251,7 @@ withKeysReferencedInGit a = do
 	rs <- relevantrefs <$> showref
 	forM_ rs (withKeysReferencedInGitRef a)
 	where
-		showref = inRepo $ Git.Command.pipeRead [Param "show-ref"]
+		showref = inRepo $ Git.Command.pipeReadStrict [Param "show-ref"]
 		relevantrefs = map (Git.Ref .  snd) .
 			nubBy uniqref .
 			filter ourbranches .