From 722ef18563ca8f7cc265f00c470fdbcb636ae0f0 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sat, 9 May 2015 08:40:51 +0200
Subject: [PATCH] fix, useless project double update

---
 src/ce_projconf.pas | 2 ++
 1 file changed, 2 insertions(+)

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;