@@ -39,16 +39,16 @@ module internal FSharpClassificationTypes =
3939| SemanticClassificationType.Property-> Property
4040
4141module internal ClassificationDefinitions =
42- [<Export; Name( FSharpClassificationTypes.Function); BaseDefinition( " identifier " ) >]
42+ [<Export; Name( FSharpClassificationTypes.Function); BaseDefinition( PredefinedClassificationTypeNames.FormalLanguage ) >]
4343let FSharpFunctionClassificationType : ClassificationTypeDefinition = null
4444
45- [<Export; Name( FSharpClassificationTypes.MutableVar); BaseDefinition( " identifier " ) >]
45+ [<Export; Name( FSharpClassificationTypes.MutableVar); BaseDefinition( PredefinedClassificationTypeNames.FormalLanguage ) >]
4646let FSharpMutableVarClassificationType : ClassificationTypeDefinition = null
4747
48- [<Export; Name( FSharpClassificationTypes.Printf); BaseDefinition( " identifier " ) >]
48+ [<Export; Name( FSharpClassificationTypes.Printf); BaseDefinition( PredefinedClassificationTypeNames.FormalLanguage ) >]
4949let FSharpPrintfClassificationType : ClassificationTypeDefinition = null
5050
51- [<Export; Name( FSharpClassificationTypes.Property); BaseDefinition( " identifier " ) >]
51+ [<Export; Name( FSharpClassificationTypes.Property); BaseDefinition( PredefinedClassificationTypeNames.FormalLanguage ) >]
5252let FSharpPropertyClassificationType : ClassificationTypeDefinition = null
5353
5454[<Export( typeof< EditorFormatDefinition>) >]
@@ -58,9 +58,8 @@ module internal ClassificationDefinitions =
5858[<Order( After= PredefinedClassificationTypeNames.Keyword) >]
5959type internal FSharpFunctionTypeFormat () as self=
6060inherit ClassificationFormatDefinition()
61-
61+ // Not setting any colors here, so it will inherit from "Plain Text" by default
6262do self.DisplayName<- SR.FSharpFunctionsOrMethodsClassificationType.Value
63- self.ForegroundColor<- Nullable Colors.Black
6463
6564[<Export( typeof< EditorFormatDefinition>) >]
6665[<ClassificationType( ClassificationTypeNames= FSharpClassificationTypes.MutableVar) >]
@@ -93,4 +92,3 @@ module internal ClassificationDefinitions =
9392inherit ClassificationFormatDefinition()
9493
9594do self.DisplayName<- SR.FSharpPropertiesClassificationType.Value
96- self.ForegroundColor<- Nullable Colors.Black