From 5ede412c0dcff21e28bccdc7fa31396caaa66bc5 Mon Sep 17 00:00:00 2001 From: Martin Date: Tue, 6 May 2025 10:09:05 +0200 Subject: [PATCH] IDE: fix color setting for "marks-gutter-part". It needs to be painted in "parent" (gutter) background color. Issue #41616 --- ide/editoroptions.pp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp index fa9d51b1a5..a4bf0b3a75 100644 --- a/ide/editoroptions.pp +++ b/ide/editoroptions.pp @@ -7886,6 +7886,8 @@ begin SetGutterColorByClass(ahaModifiedLine, TSynGutterChanges); SetGutterColorByClass(ahaCodeFoldingTree, TSynGutterCodeFolding); SetGutterColorByClass(ahaGutterSeparator, TSynGutterSeparator); + if assigned(ASynEdit.Gutter.Parts.ByClass[TSynGutterMarks, 0]) then + ASynEdit.Gutter.Parts.ByClass[TSynGutterMarks, 0].MarkupInfo.Clear; // always use gutter color for marks Attri := AttributeByEnum[ahaCodeFoldingTreeCurrent]; if Attri <> nil then begin if ASynEdit.Gutter.Parts.ByClass[TSynGutterCodeFolding,0] <> nil then