fix, cesyms disabled for non-D docs

This commit is contained in:
Basile Burg 2015-03-12 23:06:07 +01:00
parent b7ebaa3879
commit 3b3bdf5c7b
2 changed files with 2 additions and 1 deletions

View File

@ -24,7 +24,7 @@ inherited CESymbolListWidget: TCESymbolListWidget
Width = 302
Align = alClient
BorderSpacing.Around = 4
DefaultItemHeight = 18
DefaultItemHeight = 16
HideSelection = False
Images = imgList
ReadOnly = True

View File

@ -632,6 +632,7 @@ var
begin
if fDoc = nil then exit;
if fDoc.Lines.Count = 0 then exit;
if not fDoc.isDSource then exit;
// standard process options
killProcess(fToolProc);