diff --git a/src/ce_messages.pas b/src/ce_messages.pas
index 7c6af107..a54c61d9 100644
--- a/src/ce_messages.pas
+++ b/src/ce_messages.pas
@@ -324,8 +324,7 @@ end;
 destructor TCEMessagesWidget.destroy;
 begin
   fToDemangle.Free;
-  fToDemangleObjs.Free;
-  fToDemangleObjs := nil;
+  FreeAndNil(fToDemangleObjs);
   freeDemangler;
   fOptions.saveToFile(getCoeditDocPath + optname);
   EntitiesConnector.removeObserver(self);
@@ -809,8 +808,7 @@ begin
   //
   if fDemangler.Active then
     fDemangler.Terminate(0);
-  fDemangler.Free;
-  fDemangler := nil;
+  FreeAndNil(fDemangler);
 end;
 
 procedure TCEMessagesWidget.updateLoop;