diff --git a/src/ce_symlist.lfm b/src/ce_symlist.lfm
index abfd201c..31938bd9 100644
--- a/src/ce_symlist.lfm
+++ b/src/ce_symlist.lfm
@@ -24,7 +24,7 @@ inherited CESymbolListWidget: TCESymbolListWidget
         Width = 302
         Align = alClient
         BorderSpacing.Around = 4
-        DefaultItemHeight = 18
+        DefaultItemHeight = 16
         HideSelection = False
         Images = imgList
         ReadOnly = True
diff --git a/src/ce_symlist.pas b/src/ce_symlist.pas
index de668b4b..9dbf9e41 100644
--- a/src/ce_symlist.pas
+++ b/src/ce_symlist.pas
@@ -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);