Skip to content

Commit 56d4345

Browse files
authored
Merge branch 'master' into cabal-ghc90-no-more
2 parents cf05dee + fe573f8 commit 56d4345

File tree

2 files changed

+1
-2
lines changed

2 files changed

+1
-2
lines changed

ghcide/src/Development/IDE/Plugin/CodeAction/ExactPrint.hs

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -514,7 +514,6 @@ extendImportViaParent df parent child (L l it@ImportDecl{..})
514514
listAnn = epAnn srcParent [AddEpAnn AnnOpenP (epl 1), AddEpAnn AnnCloseP (epl 0)]
515515
x :: LIE GhcPs = reLocA $ L l'' $ IEThingWith listAnn parentLIE NoIEWildcard [childLIE]
516516

517-
let hasSibling = not (null pre)
518517
lies' <- addCommaInImportList (reverse pre) x
519518
#endif
520519
return $ L l it{ideclHiding = Just (hide, L l' lies')}

plugins/hls-rename-plugin/src/Ide/Plugin/Rename.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -161,7 +161,7 @@ renameRefs newName refs = everywhere $ mkT replaceLoc
161161
replace _ = Unqual newName
162162

163163
isRef :: SrcSpan -> Bool
164-
isRef = (`elem` refs) . unsafeSrcSpanToLoc
164+
isRef = (`HS.member` refs) . unsafeSrcSpanToLoc
165165

166166
---------------------------------------------------------------------------------------------------
167167
-- Reference finding

0 commit comments

Comments
 (0)