bug fix, must scrub lots first, else hopeless confusion will reign

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@9028 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 2003-08-10 15:30:17 +00:00
parent efb4b97c2f
commit fa63bad02f

View File

@ -389,6 +389,17 @@ ap_show_book (GnomeDruidPage *druidpage,
/* =============================================================== */
static void
scrub_all(void)
{
AccountGroup *group = gnc_get_current_group ();
xaccGroupScrubOrphans (group);
xaccGroupScrubImbalance (group);
xaccGroupScrubLotsBalance (group);
}
/* =============================================================== */
static gboolean
ap_close_period (GnomeDruidPage *druidpage,
GtkWidget *druid,
@ -422,6 +433,7 @@ ap_close_period (GnomeDruidPage *druidpage,
/* Close the books ! */
gnc_suspend_gui_refresh ();
scrub_all();
closed_book = gnc_book_close_period (current_book, closing_date, NULL, btitle);
book_frame = qof_book_get_slots(closed_book);