From d813dae81b92dedfd8548e06e9a4d614cf9cbd4f Mon Sep 17 00:00:00 2001 From: Kevin Ransom Date: Mon, 18 Sep 2017 15:07:27 -0700 Subject: [PATCH] Fix for: 3596 --- [.NET Framework Projects] IDE is confused about the last file to compile --- .../FSharp.Editor/LanguageService/LanguageService.fs | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs index 0b2d64bccb..29658d69a5 100644 --- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs +++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs @@ -273,9 +273,13 @@ type internal FSharpProjectOptionsManager } member this.UpdateProjectInfoWithProjectId(projectId:ProjectId, userOpName) = - let project = workspace.CurrentSolution.GetProject(projectId) - let siteProvider = this.ProvideProjectSiteProvider(project) - this.UpdateProjectInfo(tryGetOrCreateProjectId, projectId, siteProvider.GetProjectSite(), userOpName) + let hier = workspace.GetHierarchy(projectId) + match hier with + | h when (h.IsCapabilityMatch("CPS")) -> + let project = workspace.CurrentSolution.GetProject(projectId) + let siteProvider = this.ProvideProjectSiteProvider(project) + this.UpdateProjectInfo(tryGetOrCreateProjectId, projectId, siteProvider.GetProjectSite(), userOpName) + | _ -> () member this.UpdateProjectInfoWithPath(path, userOpName) = let projectId = workspace.ProjectTracker.GetOrCreateProjectIdForPath(path, projectDisplayNameOf path)