From c9b0df3a122832fc1e430802ee1906a39a9eae0f Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sat, 9 Feb 2002 01:48:00 +0000
Subject: [PATCH] MG: fixed loop

git-svn-id: trunk@1163 -
---
 lcl/interfaces/gtk/gtkobject.inc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/gtk/gtkobject.inc b/lcl/interfaces/gtk/gtkobject.inc
index d488b03fae..231e7b14ac 100644
--- a/lcl/interfaces/gtk/gtkobject.inc
+++ b/lcl/interfaces/gtk/gtkobject.inc
@@ -578,7 +578,8 @@ var
       // this is a container widget -> go through all childs
       ChildEntry:=PGtkContainer(PaintWidget)^.resize_widgets;
       while ChildEntry<>nil do begin
-        ForAllChilds(PGtkWidget(ChildEntry^.Data));
+        if PGtkWidget(ChildEntry^.Data)<>PaintWidget then
+          ForAllChilds(PGtkWidget(ChildEntry^.Data));
         ChildEntry:=ChildEntry^.Next;
       end;
     end;
@@ -6527,6 +6528,9 @@ end;
  { =============================================================================
 
   $Log$
+  Revision 1.275  2002/10/31 18:54:17  lazarus
+  MG: fixed loop
+
   Revision 1.274  2002/10/30 17:43:35  lazarus
   AJ: added IsNullBrush checks to reduce pointless color allocations & GDK function calls