From 6b20d104f38657259e2895f688a0fe57e5fae87b Mon Sep 17 00:00:00 2001
From: blikblum <blikblum@lazarus-ide.org>
Date: Sat, 10 Sep 2011 17:40:53 +0000
Subject: [PATCH] lcl: code cleanup of TDBMemo

git-svn-id: trunk@32261 -
---
 lcl/include/dbmemo.inc | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lcl/include/dbmemo.inc b/lcl/include/dbmemo.inc
index 2e28b4e8e3..c58ed3b857 100644
--- a/lcl/include/dbmemo.inc
+++ b/lcl/include/dbmemo.inc
@@ -217,8 +217,7 @@ end;
 
 destructor TDBMemo.Destroy;
 begin
-  FDataLink.Free;
-  FDataLink:=nil;
+  FDataLink.Destroy;
   inherited Destroy;
 end;