Skip to content
Permalink
Browse files

Issue #196: Prefer to take comment from SHOW TABLE STATUS result, to …

…support single quotes without including some "compression" option on TokuDB
  • Loading branch information...
ansgarbecker committed Mar 10, 2019
1 parent 098c526 commit 7ae15992f9c0c080795282b09ed7d0f005f5a8d5
Showing with 5 additions and 5 deletions.
  1. +5 −5 source/table_editor.pas
@@ -324,11 +324,11 @@ procedure TfrmTableEditor.Init(Obj: TDBObject);
memoUnionTables.Lines.Text := rx.Match[1]
else
memoUnionTables.Lines.Clear;
rx.Expression := '\bCOMMENT=''((.+)[^''])''';
if rx.Exec(DBObject.CreateCode) then
memoComment.Lines.Text := DBObject.Connection.UnescapeString(rx.Match[1])
else
memoComment.Lines.Clear;

// Prefer to take comment from SHOW TABLE STATUS result, to support single quotes without including some create option
// See issue #196
memoComment.Text := DBObject.Comment;

rx.Expression := '\b(PARTITION\s+.+)(\*/)';
if rx.Exec(DBObject.CreateCode) then
SynMemoPartitions.Text := rx.Match[1]

0 comments on commit 7ae1599

Please sign in to comment.
You can’t perform that action at this time.