synedit: added note

git-svn-id: trunk@18163 -
This commit is contained in:
mattias 2009-01-06 11:05:35 +00:00
parent 63d5f54f09
commit 1f1aa8a31a

View File

@ -1313,6 +1313,7 @@ var
begin
//debugln('TSynCompletion.Validate ',dbgsName(Sender),' ',dbgs(Shift),' Position=',dbgs(Position));
F := Sender as TSynBaseCompletionForm;
// Note: Form.Visible can be false, for example when completion only contains one item
if F.CurrentEditor is TCustomSynEdit then
with TCustomSynEdit(F.CurrentEditor) do begin
BeginUndoBlock;