From 2564a01db6dcd6f8f573b1f0d9b47d82e943da9d Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
Date: Sat, 28 Mar 2015 19:39:33 +0100
Subject: Fix stray output

---
 Distribution/Helper.hs | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/Distribution/Helper.hs b/Distribution/Helper.hs
index cd1d30e..44b17bb 100644
--- a/Distribution/Helper.hs
+++ b/Distribution/Helper.hs
@@ -202,7 +202,7 @@ writeAutogenFiles :: MonadIO m
                   -> m ()
 writeAutogenFiles distdir = liftIO $ do
   exe  <- findLibexecExe "cabal-helper-wrapper"
-  callProcess' exe [distdir, "write-autogen-files"]
+  void $ readProcess exe [distdir, "write-autogen-files"] ""
 
 -- | This exception is thrown by all 'runQuery' functions if the internal
 -- wrapper executable cannot be found. You may catch this and present the user
@@ -276,10 +276,3 @@ getExecutablePath' =
 #else
     getProgName
 #endif
-
-callProcess' exe args =
-#if MIN_VERSION_process(1,2,0)
-    callProcess exe args
-#else
-    void $ readProcess exe args ""
-#endif
-- 
cgit v1.2.3