[commit: ghc] master: Remove unused argument from importSuggestions (a6ce7f3)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/a6ce7f338c88920f380a2ed3f3f82b0184aeb341/ghc

>---------------------------------------------------------------

commit a6ce7f338c88920f380a2ed3f3f82b0184aeb341
Author: Matthew Pickering <matthewtpickering at gmail.com>
Date:   Thu Mar 23 14:08:26 2017 +0000

    Remove unused argument from importSuggestions
    
    Reviewers: austin, bgamari
    
    Subscribers: rwbarton, thomie
    
    Differential Revision: https://phabricator.haskell.org/D3376


>---------------------------------------------------------------

a6ce7f338c88920f380a2ed3f3f82b0184aeb341
 compiler/rename/RnEnv.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/compiler/rename/RnEnv.hs b/compiler/rename/RnEnv.hs
index 7c05994..ae647f1 100644
--- a/compiler/rename/RnEnv.hs
+++ b/compiler/rename/RnEnv.hs
@@ -1843,7 +1843,7 @@ unknownNameSuggestions_ :: WhereLooking -> DynFlags
                        -> RdrName -> SDoc
 unknownNameSuggestions_ where_look dflags global_env local_env imports tried_rdr_name =
     similarNameSuggestions where_look dflags global_env local_env tried_rdr_name $$
-    importSuggestions dflags imports tried_rdr_name
+    importSuggestions imports tried_rdr_name
 
 
 similarNameSuggestions :: WhereLooking -> DynFlags
@@ -1964,8 +1964,8 @@ similarNameSuggestions where_look dflags global_env
         | i <- is, let ispec = is_decl i, is_qual ispec ]
 
 -- | Generate helpful suggestions if a qualified name Mod.foo is not in scope.
-importSuggestions :: DynFlags -> ImportAvails -> RdrName -> SDoc
-importSuggestions _dflags imports rdr_name
+importSuggestions :: ImportAvails -> RdrName -> SDoc
+importSuggestions imports rdr_name
   | not (isQual rdr_name || isUnqual rdr_name) = Outputable.empty
   | null interesting_imports
   , Just name <- mod_name