* src/engine/gnc-book.c (gnc_book_set_group): free account group

when setting new one.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@4153 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
James LewisMoss 2001-05-10 16:12:52 +00:00
parent 84108d7b6a
commit 74a69a5846
2 changed files with 4 additions and 2 deletions

View File

@ -197,8 +197,9 @@ gnc_book_get_group (GNCBook *book)
void
gnc_book_set_group (GNCBook *book, AccountGroup *grp)
{
if (!book) return;
book->topgroup = grp;
if(!book) return;
if(book->topgroup) xaccFreeAccountGroup(book->topgroup);
book->topgroup = grp;
}
/* ---------------------------------------------------------------------- */

View File

@ -120,6 +120,7 @@ GNCBackendError gnc_book_pop_error (GNCBook *book);
AccountGroup *gnc_book_get_group (GNCBook *book);
void gnc_book_set_group(GNCBook *book, AccountGroup *group);
GNCPriceDB *gnc_book_get_pricedb (GNCBook *book);
guint gnc_book_count_transactions(GNCBook *book);