From 17c4f9181262154708fd98bb34c61d76659de95b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= <dxld@darkboxed.org>
Date: Sun, 17 Jan 2016 20:04:01 +0100
Subject: [PATCH] add TODO for HMG

---
 Language/Haskell/GhcMod/HomeModuleGraph.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Language/Haskell/GhcMod/HomeModuleGraph.hs b/Language/Haskell/GhcMod/HomeModuleGraph.hs
index f39fdbf..e9e2a85 100644
--- a/Language/Haskell/GhcMod/HomeModuleGraph.hs
+++ b/Language/Haskell/GhcMod/HomeModuleGraph.hs
@@ -240,6 +240,7 @@ updateHomeModuleGraph' env smp0 = do
                mns = map (unLoc . ideclName)
                    $ filter (isNothing . ideclPkgQual)
                    $ map unLoc hsmodImports
+           -- TODO: handle package qualifier "this"
            liftIO $ Set.fromList . catMaybes <$> mapM (findModulePath env) mns
 
 preprocessFile :: (IOish m, GmEnv m, GmState m) =>