From 2c44f1f61602bb8d74acd5187223316b494a71c2 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 14 Jul 2016 07:01:05 +0000
Subject: [PATCH] RichMemo: fix compile with latest lazarus - utf8

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4950 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/richmemo/richmemopackage.pas | 1 +
 components/richmemo/richmemortf.pas     | 1 +
 2 files changed, 2 insertions(+)

diff --git a/components/richmemo/richmemopackage.pas b/components/richmemo/richmemopackage.pas
index b15332681..3d0014581 100644
--- a/components/richmemo/richmemopackage.pas
+++ b/components/richmemo/richmemopackage.pas
@@ -4,6 +4,7 @@
 
 unit richmemopackage;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
diff --git a/components/richmemo/richmemortf.pas b/components/richmemo/richmemortf.pas
index d3c8339dc..68d71bef6 100644
--- a/components/richmemo/richmemortf.pas
+++ b/components/richmemo/richmemortf.pas
@@ -32,6 +32,7 @@ function SaveStream(ARich: TCustomRichMemo; Dst: TStream): Boolean;
 procedure RegisterRTFSaver;
 
 implementation
+uses LazUTF8;
 
 var
   LangConvTable : array of record lang: integer; proc: TEncConvProc end;