anchor.diff:    LinePartObj: TATLinePartClass;
     XColor, XColorSelected, XColorOccur, XColorSpell: TBGRAPixel;
     NColor: TColor;
  -  RectMark, RectMap: TRect;
  +  RectMark: TRect;
     NLine1, NLine2, NIndex, i: integer;
   begin
     St:= Ed.Strings;
  
positive.code:     if NColor<>clNone then
      begin
        XColor.FromColor(NColor);
        RectMark:= Ed.RectMicromapMark(i, -1, -1, RectMap, EditorOps.OpMicromapMinMarkHeight);
        FMicromapBmp.FillRect(RectMark, XColor);
      end;
    end;
  
negative.code:       NIndex:= BookmarkPtr^.Data.LineNum;
        if Ed.IsLineFolded(NIndex) then
          Continue;
        RectMark:= Ed.RectMicromapMark(1{column}, NIndex, NIndex, ARect.Height, EditorOps.OpMicromapMinMarkHeight);
        FMicromapBmp.FillRect(RectMark, XColor);
      end;
    end;
  