We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7ac5faf commit cc86bc7Copy full SHA for cc86bc7
1 file changed
plugins/hls-refactor-plugin/src/Development/IDE/Plugin/CodeAction.hs
@@ -622,7 +622,7 @@ suggestDeleteUnusedBinding
622
concatMap (findSig . reLoc) hsmodDecls
623
_ -> concatMap (findRelatedSpanForMatch indexedContent name) matches
624
(L (EpAnn (EpaSpan (RealSrcSpan lname _)) _ c) (SigD _ bind))
625
- -> bind `seq` [toRange $ joinComms (commsToList c) lname]
+ -> [extendForDeletion indexedContent $ bind `seq` toRange $ joinComms (commsToList c) lname]
626
_ -> decl `seq` []
627
628
extractNameAndMatchesFromFunBind
0 commit comments