From cbedf0d16322e7f9c577993cf5df56012a9c0153 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sun, 13 Dec 2009 15:01:22 +0000
Subject: [PATCH] Fix enabled save button in table editor before anything was
 changed.

---
 source/table_editor.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/source/table_editor.pas b/source/table_editor.pas
index 9ef5210c..0bcd2a30 100644
--- a/source/table_editor.pas
+++ b/source/table_editor.pas
@@ -318,14 +318,14 @@ begin
 
     rx.Expression := '\bUNION=\((.+)\)';
     if rx.Exec(CreateTable) then
-      memoUnionTables.Text := rx.Match[1]
+      memoUnionTables.Lines.Text := rx.Match[1]
     else
-      memoUnionTables.Clear;
+      memoUnionTables.Lines.Clear;
     rx.Expression := '\bCOMMENT=''((.+)[^''])''';
     if rx.Exec(CreateTable) then
-      memoComment.Text := WideStringReplace(rx.Match[1], '''''', '''', [rfReplaceAll])
+      memoComment.Lines.Text := WideStringReplace(rx.Match[1], '''''', '''', [rfReplaceAll])
     else
-      memoComment.Clear;
+      memoComment.Lines.Clear;
     ParseTableStructure(CreateTable, FColumns, FKeys, FForeignKeys);
   end;
   listColumns.RootNodeCount := FColumns.Count;