diff --git a/vsintegration/src/FSharp.Editor/Common/CommonHelpers.fs b/vsintegration/src/FSharp.Editor/Common/CommonHelpers.fs index c9569ebd1a3..57d15f9acd7 100644 --- a/vsintegration/src/FSharp.Editor/Common/CommonHelpers.fs +++ b/vsintegration/src/FSharp.Editor/Common/CommonHelpers.fs @@ -483,7 +483,7 @@ module internal Extensions = member this.IsPrivateToFile = let isPrivate = match this.Symbol with - | :? FSharpMemberOrFunctionOrValue as m -> not m.IsModuleValueOrMember + | :? FSharpMemberOrFunctionOrValue as m -> not m.IsModuleValueOrMember || m.Accessibility.IsPrivate | :? FSharpEntity as m -> m.Accessibility.IsPrivate | :? FSharpGenericParameter -> true | :? FSharpUnionCase as m -> m.Accessibility.IsPrivate