From b8614fc00675909b3e10ded6895fde012b9f7aef Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Tue, 1 May 2007 06:48:06 +0000
Subject: [PATCH] overview fix

---
 overview.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/overview.hs b/overview.hs
index 82d6dd5e8..8cf6b2a19 100644
--- a/overview.hs
+++ b/overview.hs
@@ -17,6 +17,7 @@ main = do
   let modules = concat $ map ((++ ".hs ") . dropWhile (== ' ')) preamble
   let grep = "grep -H '^\\w[^=]*::' " ++ modules
   (inp, out, err, pid) <- runInteractiveCommand grep
+  waitForProcess pid
   grepoutput <- hGetContents out
   let groups = groupBy (\a b -> samefile a b) $ lines grepoutput
   sequence $ map printgroup groups