"Remove redundant imports" doesn't trigger on PatSyn imports

[ozkutuk]

Steps to reproduce

• A.hs:

{-# LANGUAGE PatternSynonyms #-}

module A (pattern Pat, val) where

pattern Pat :: Int
pattern Pat = 42

val :: String
val = "foo"

• B.hs:

{-# OPTIONS -Wall #-}
{-# LANGUAGE PatternSynonyms #-}

module B where

import A (pattern Pat, val)

bval :: String
bval = val ++ "bar"

• Trigger code action in B.hs over pattern Pat import

Expected behaviour

An option to remove redundant Pat import should appear

Actual behaviour

No redundant import actions appear