anchor.diff:      procedure KeyDown(var Key: Word; Shift: TShiftState); override;
       procedure MouseMove(Shift: TShiftState; X, Y: Integer); override;
       procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y:Integer); override;
  +    procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y:Integer); override;
     public
       constructor Create(aOwner: TComponent); override;
       destructor destroy; override;
  
positive.code:   fStoredFontSize := Font.Size;
  
    MouseOptions := MouseOptions +
      [ emAltSetsColumnMode, emDragDropEditing, emCtrlWheelZoom];
    Gutter.LineNumberPart.ShowOnlyLineNumbersMultiplesOf := 5;
    Gutter.LineNumberPart.MarkupInfo.Foreground := clGray;
    Gutter.SeparatorPart.LineOffset := 1;
  
negative.code:   identifierToD2Syn;
  end;
  
  procedure TCESynMemo.MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y:Integer);
  begin
    inherited;
    if (Button = mbMiddle) and (Shift = [ssCtrl]) then
      Font.Size := fStoredFontSize;
  end;
  
  initialization
    D2Syn := TSynD2Syn.create(nil);
    LfmSyn := TSynLFMSyn.Create(nil);
  