From 94afdceb9c6b4132b42f5b8d80e30c2bb2b5b296 Mon Sep 17 00:00:00 2001
From: michl <michl@lazarus-ide.org>
Date: Thu, 27 Jul 2023 20:35:18 +0200
Subject: [PATCH] Revert "Fixed removing of incorrect component properties in
 LFM with installed DockedFormEditor. Issue #40377."

This reverts commit 25a3b69252036671d2e1f5ab9b75101eb9af3157.
---
 ide/sourcefilemanager.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/ide/sourcefilemanager.pas b/ide/sourcefilemanager.pas
index 21a9a4eaa0..e798863c1d 100644
--- a/ide/sourcefilemanager.pas
+++ b/ide/sourcefilemanager.pas
@@ -3874,10 +3874,6 @@ begin
     Result:=mrOk;
   finally
     Project1.EndUpdate;
-
-    // set all modified to false
-    Project1.ClearModifieds(true);
-
     SourceEditorManager.DecUpdateLock;
     if (Result<>mrOk) and (Project1<>nil) then begin
       // mark all files, that are left to open as unloaded:
@@ -3890,6 +3886,9 @@ begin
       end;
     end;
 
+    // set all modified to false
+    Project1.ClearModifieds(true);
+
     // call ProjectOpened handlers
     HandlerResult:=MainIDE.DoCallProjectChangedHandler(lihtProjectOpened, Project1);
     if not (HandlerResult in [mrOk,mrCancel,mrAbort]) then