diff --git a/ChangeLog b/ChangeLog
index d88cd12496..396e7926d5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2001-05-14  Dave Peticolas  <dave@krondo.com>
 
+	* src/engine/Account.c (xaccAccountGetChildren): fix bug
+
 	* src/engine/sixtp-dom-generators.c (add_kvp_value_node): use
 	xmlNewTextChild.
 
diff --git a/src/engine/Account.c b/src/engine/Account.c
index e8927148b1..7861bb1ea0 100644
--- a/src/engine/Account.c
+++ b/src/engine/Account.c
@@ -1296,7 +1296,7 @@ xaccAccountGetChildren (Account *acc)
 {
    if (!acc) return NULL;
    if (acc->children == NULL)
-       acc->children = xaccMallocAccountGroup ();
+     xaccAccountInsertSubAccount (acc, NULL);
    return (acc->children);
 }