diff --git a/src/ce_projconf.pas b/src/ce_projconf.pas
index 2945f0cb..7d34e6c2 100644
--- a/src/ce_projconf.pas
+++ b/src/ce_projconf.pas
@@ -298,11 +298,13 @@ begin
   //
   nme := '';
   beginImperativeUpdate;
+  fProj.beginUpdate;
   src := fProj.currentConfiguration;
   trg := fProj.addConfiguration;
   trg.assign(src);
   if InputQuery('Configuration name', '', nme) then trg.name := nme;
   fProj.ConfigurationIndex := trg.Index;
+  fProj.endUpdate;
   endImperativeUpdate;
 end;