minor cleanup

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@781 57a11ea4-9604-0410-9ed3-97b8803252fd
zzzoldfeatures/xacc-12-patch
Linas Vepstas 29 years ago
parent cec5cb3918
commit 5003b58622

@ -56,12 +56,11 @@ LedgerDestroy (BasicRegister *reg)
/* be sure to destroy the "blank split" */
if (reg->user_hook) {
Split *split;
Account * acc;
split = (Split *) (reg->user_hook);
acc = xaccSplitGetAccount (split);
xaccAccountRemoveSplit (acc, split);
/* split destroy will automatically remove it
* from its parent account */
xaccSplitDestroy (split);
reg->user_hook = NULL;
}

Loading…
Cancel
Save