Add object reference when object is set as accessible_parent

* atk/atkobject.c:
Add object reference when object is set as accessible_parent

diff --git a/ChangeLog b/ChangeLog
index 8af3e41..5eb92cd 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-11  Padraig O'Briain  <padraig.obriain@sun.com>
+
+       * atk/atkobject.c:
+       Add object reference when object is set as accessible_parent
+
 2001-09-05  Mark McLoughlin <mark@skynet.ie>
 
        * configure.in: remember ACLOCAL_FLAGS.

diff --git a/atk/atkobject.c b/atk/atkobject.c
index 50114bc..9eba65e 100755 (executable)
--- a/atk/atkobject.c
+++ b/atk/atkobject.c
@@ -855,9 +855,10 @@ atk_object_finalize (GObject *object)
    * Free memory allocated for relation set if it have been allocated.
    */
   if (accessible->relation_set)
-  {
     g_object_unref (accessible->relation_set);
-  }
+
+  if (accessible->accessible_parent)
+    g_object_unref (accessible->accessible_parent);
 
   G_OBJECT_CLASS (parent_class)->finalize (object);
 }
@@ -936,8 +937,12 @@ static void
 atk_object_real_set_parent (AtkObject       *object,
                             AtkObject       *parent)
 {
-  object->accessible_parent = parent;
+  if (object->accessible_parent)
+    g_object_unref (object->accessible_parent);
 
+  object->accessible_parent = parent;
+  if (object->accessible_parent)
+    g_object_ref (object->accessible_parent);
 }
 
 static void