diff --git a/source/extra_controls.pas b/source/extra_controls.pas
index d0cd8dc3..b6e2e832 100644
--- a/source/extra_controls.pas
+++ b/source/extra_controls.pas
@@ -23,12 +23,6 @@ type
       property HasSizeGrip: Boolean read GetHasSizeGrip write SetHasSizeGrip default False;
       class procedure FixControls(ParentComp: TComponent);
   end;
-  // Memo replacement which accepts any line break format
-  TLineNormalizingMemo = class(TMemo)
-    private
-      procedure WMSetText(var msg: TWMSettext); message WM_SETTEXT;
-      procedure WMPaste(var msg: TWMPaste); message WM_PASTE;
-  end;
 
 
 implementation
@@ -204,29 +198,4 @@ end;
 
 
 
-
-{ TLineNormalizingMemo }
-
-procedure TLineNormalizingMemo.WMSetText(var msg: TWMSettext);
-var
-  s: string;
-begin
-  s := msg.Text;
-  s := AdjustLineBreaks(s);
-  msg.Text := PChar(s);
-  inherited;
-end;
-
-
-procedure TLineNormalizingMemo.WMPaste(var msg: TWMPaste);
-var
-  s: string;
-begin
-  if Clipboard.HasFormat(cf_Text) then begin
-    s := Clipboard.AsText;
-    s := AdjustLineBreaks(s);
-    SelText := s;
-  end;
-end;
-
 end.