fix bug updating first child in insertbefore.

[bbk/bchanf.git] / src / coll / treebase.c

diff --git a/src/coll/treebase.c b/src/coll/treebase.c
index a599a06..c70e726 100644 (file)
--- a/src/coll/treebase.c
+++ b/src/coll/treebase.c
@@ -53,6 +53,9 @@ EXPORT W treebase_node_insertbefore(treebase_node_t *node, treebase_node_t *chil
                return -1; /* TODO */
        }
 
+       if (node->firstchild == ref) {
+               node->firstchild = child;
+       }
        QueInsert(&child->sibling, &ref->sibling);
        child->parent = node;