From e95f446f3b2d36f405fd6ef14d2ad088607bc001 Mon Sep 17 00:00:00 2001 From: Don Syme Date: Wed, 26 Jul 2017 00:15:58 +0100 Subject: [PATCH] fix 3033 - correct order for project references --- .../src/FSharp.Editor/LanguageService/LanguageService.fs | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs index 19f8b1cf606..573b7c8f3f8 100644 --- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs +++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs @@ -456,16 +456,13 @@ and let referencedProjectSites = ProjectSitesAndFiles.GetReferencedProjectSites (site, this.SystemServiceProvider) for referencedSite in referencedProjectSites do - let referencedProjectFileName = referencedSite.ProjectFileName() - let referencedProjectDisplayName = projectDisplayNameOf referencedProjectFileName - let referencedProjectId = workspace.ProjectTracker.GetOrCreateProjectIdForPath(referencedProjectFileName, referencedProjectDisplayName) + let referencedProjectId = setup referencedSite project.AddProjectReference(ProjectReference referencedProjectId) if not (workspace.ProjectTracker.ContainsProject(project)) then workspace.ProjectTracker.AddProject(project) - for referencedSite in referencedProjectSites do - setup referencedSite + projectId setup (siteProvider.GetProjectSite()) |> ignore