Warnings for redundant imports doesn't take name shadowing into account (Regression)

Reproduction:

module Log where

import Prelude hiding (log)

f :: ()
f = log where log = ()

Compiling this with -Wall On GHC 7.8.2:

> ghc Log.hs -Wall
[1 of 1] Compiling Log              ( Log.hs, Log.o )

Log.hs:3:1: Warning:
    The import of ‘Prelude’ is redundant
      except perhaps to import instances from ‘Prelude’
    To import instances alone, use: import Prelude()

The suggestion is incorrect since removing the import statement gives the following warning:

Log.hs:4:15: Warning:
    This binding for ‘log’ shadows the existing binding
      imported from ‘Prelude’ at Log.hs:1:8-10
      (and originally defined in ‘GHC.Float’)

On GHC 7.6.3 the Reproduction does not give any warnings (which is correct).

Trac metadata

Trac field	Value
Version	7.8.2
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture

changed weight to 5

added Tbug Trac import labels

Ah yes, thank you. Patch coming.

mentioned in commit 9f3e39d5

mentioned in commit 5b73dc5f

Just about worth merging to 7.8, but hardly a big deal.

Simon

Trac metadata

Trac field	Value
Test case	→ module/T9061

added 1 deleted label

changed milestone to %7.8.3

closed

Trac metadata

Trac field	Value
Resolution	Unresolved → ResolvedFixed

removed 1 deleted label

added error messages label

added Pnormal label