From 25b0fa69b29fd81b87819dff61cd36a764407da8 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Mon, 20 Feb 2023 19:39:30 +0100
Subject: [PATCH] SynEdit: Fixed reordering gutter parts. Apply new bounds.

---
 components/synedit/syngutterbase.pp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/synedit/syngutterbase.pp b/components/synedit/syngutterbase.pp
index e3f71fc78a..6b575b60fc 100644
--- a/components/synedit/syngutterbase.pp
+++ b/components/synedit/syngutterbase.pp
@@ -442,7 +442,10 @@ begin
       NewWidth := NewWidth + Parts[i].Width;
     end;
 
-  if FWidth = NewWidth then exit;
+  if FWidth = NewWidth then begin
+    SetChildBounds;
+    exit;
+  end;
 
   IncChangeLock;
   try