Adding back editor factories?

Author: Omar Tawfik

vsintegration/VisualFSharpVsix/VisualFSharpVsix.csproj

@@ -71,6 +71,7 @@
     <VSSDKTargetPlatformRegRootSuffix>$(VSRootSuffix)</VSSDKTargetPlatformRegRootSuffix>
   </PropertyGroup>
   <ItemGroup>
+    <Content Include="RegisterFsharpPackage.pkgdef" />
     <None Include="Source.extension.vsixmanifest">
       <SubType>Designer</SubType>
     </None>

vsintegration/src/FSharp.LanguageService/FSharpCommonConstants.fs

@@ -12,6 +12,10 @@ module internal FSharpCommonConstants =
     [<Literal>]
     let languageServiceGuidString = "BC6DD5A5-D4D6-4dab-A00D-A51242DBAF1B"
     [<Literal>]
+    let editorFactoryGuidString = "4EB7CCB7-4336-4FFD-B12B-396E9FD079A9"
+    [<Literal>]
+    let codePageEditorFactoryGuidString = "82A16493-EF43-47E0-B42D-D87BAAB5335D"
+    [<Literal>]
     let svsSettingsPersistenceManagerGuidString = "9B164E40-C3A2-4363-9BC5-EB4039DEF653"
     [<Literal>]
     let FSharpLanguageName = "F#"

vsintegration/src/FSharp.LanguageService/FSharpLanguageService.fs

@@ -71,8 +71,18 @@ type internal FSharpLanguageService(package : FSharpPackage) =
             | _ -> ()
         | _ -> ()
 
-and 
-    [<ProvideLanguageService(FSharpCommonConstants.languageServiceGuidString, FSharpCommonConstants.FSharpContentTypeName, 1)>]
+and [<Guid(FSharpCommonConstants.editorFactoryGuidString)>]
+    internal FSharpEditorFactory(package : FSharpPackage) =
+        inherit AbstractEditorFactory(package)
+
+        override this.ContentTypeName = FSharpCommonConstants.FSharpContentTypeName
+        override this.GetFormattedTextChanges(_, _, _, _) = upcast Array.empty
+
+and [<Guid(FSharpCommonConstants.codePageEditorFactoryGuidString)>]
+    internal FSharpCodePageEditorFactory(editorFactory: FSharpEditorFactory) =
+    inherit AbstractCodePageEditorFactory(editorFactory)
+
+and [<ProvideLanguageService(FSharpCommonConstants.languageServiceGuidString, FSharpCommonConstants.FSharpContentTypeName, 1)>]
     [<Guid(FSharpCommonConstants.packageGuidString)>]
     internal FSharpPackage() = 
     inherit AbstractPackage<FSharpPackage, FSharpLanguageService, FSharpProjectSite>()
@@ -87,7 +97,14 @@ and
 
     override this.CreateLanguageService() = new FSharpLanguageService(this)
 
-    override this.CreateEditorFactories() = Seq.empty<IVsEditorFactory>
+    override this.CreateEditorFactories() =
+        let editorFactory = new FSharpEditorFactory(this)
+        let codePageEditorFactory = new FSharpCodePageEditorFactory(editorFactory)
+        
+        [|
+            editorFactory :> IVsEditorFactory;
+            codePageEditorFactory :> IVsEditorFactory;
+        |] :> seq<IVsEditorFactory>
 
     override this.RegisterMiscellaneousFilesWorkspaceInformation(_) = ()