Opt_ImplicitImportQualified doesn't work for constructor field name

-- ghci -fimplicit-import-qualified
Prelude> let tree = Data.Tree.Node 0 []
Prelude> Data.Tree.rootLabel tree
0
Prelude> let f i j = i { Data.Tree.rootLabel = j }

<interactive>:4:17:
    ‘Data.Tree.rootLabel’ is not a (visible) constructor field name
Prelude> import qualified Data.Tree
Prelude Data.Tree> let f i j = i { Data.Tree.rootLabel = j }
Prelude Data.Tree> f tree 1
Node {rootLabel = 1, subForest = []}

Trac metadata

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