diff --git a/ide/keymapping.pp b/ide/keymapping.pp
index a6e9bbfb29..9de15809dd 100644
--- a/ide/keymapping.pp
+++ b/ide/keymapping.pp
@@ -4414,6 +4414,7 @@ begin
             exp.DefineCommandCategories; // default Relations
             exp.LoadFromXMLConfig(xml, 'KeyMapping/', false);
             dst.AddObject(nm, exp);
+            //now exp is owned by dst, don't free it in this procedure
             exp := nil;
           end;
         finally