From cf05b97f5c181059418c53e43fab946734cfb41d Mon Sep 17 00:00:00 2001
From: Simon Marlow <simonmar@microsoft.com>
Date: Mon, 5 Nov 2007 14:22:17 +0000
Subject: [PATCH] catch up with changes to checkModule

---
 utils/ghctags/GhcTags.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/utils/ghctags/GhcTags.hs b/utils/ghctags/GhcTags.hs
index 1c7801a..0c9bd35 100644
--- a/utils/ghctags/GhcTags.hs
+++ b/utils/ghctags/GhcTags.hs
@@ -169,7 +169,7 @@ graphData session graph =
     where foundthings ms =
               let filename = msHsFilePath ms
                   modname = moduleName $ ms_mod ms
-              in  do mod <- checkModule session modname
+              in  do mod <- checkModule session modname False
                      return $ maybe (FileData filename []) id $ do
                        m <- mod
                        s <- renamedSource m
-- 
1.7.10.4