IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

When closing the book, destroy all lots (found by valgrind)

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@18490 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Phil Longstaff 2009-12-12 20:05:44 +00:00
parent 75e1094cfd
commit 66b64e45e8
1 changed files with 21 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/engine/gnc-lot.c
View File

@ -434,6 +434,26 @@ gnc_lot_get_latest_split (GNCLot *lot)
return node->data;
}
/* When the book is being closed, destroy all lots */
static void
lot_destroy_book_end(GNCLot* lot)
{
gnc_lot_begin_edit(lot);
while (lot->splits != NULL) {
gnc_lot_remove_split(lot, (Split*)lot->splits->data);
}
qof_instance_set_destroying(lot, TRUE);
gnc_lot_commit_edit(lot);
}
static void
lot_book_end(QofBook* book)
{
QofCollection *col;
col = qof_book_get_collection (book, GNC_ID_LOT);
qof_collection_foreach(col, (QofInstanceForeachCB)lot_destroy_book_end, NULL);
}
/* ============================================================= */
static QofObject gncLotDesc =
@ -443,7 +463,7 @@ static QofObject gncLotDesc =
.type_label = "Lot",
.create = (gpointer)gnc_lot_new,
.book_begin = NULL,
.book_end = NULL,
.book_end = lot_book_end,
.is_dirty = qof_collection_is_dirty,
.mark_clean = qof_collection_mark_clean,
.foreach = qof_collection_foreach,