diff --git a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs index e3c2e5e4c54..df70a0a729a 100644 --- a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs +++ b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs @@ -375,11 +375,16 @@ module Highlight = |> Async.AwaitTask |> Async.RunSynchronously - let syntaxHighlight s = - Runtime.RunInMainThread(fun() -> editor.Text <- s) |> Async.AwaitTask |> Async.RunSynchronously + let getHighlightedMarkup s = + editor.Text <- s let data = editor.GetContent().GetTextEditorData() data.GetMarkup(0, s.Length, false, true, false, true) + let syntaxHighlight s = + Runtime.RunInMainThread (fun () -> getHighlightedMarkup s) + |> Async.AwaitTask + |> Async.RunSynchronously + let asUnderline = sprintf "_STARTUNDERLINE_%s_ENDUNDERLINE_" // we replace with real markup after highlighting module SymbolTooltips =