diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp
index 90acc04c32..b8b6b79264 100644
--- a/ide/editoroptions.pp
+++ b/ide/editoroptions.pp
@@ -7637,6 +7637,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