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

fix a silly core dump when destroying accounts with open windows

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@1667 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 1999-02-03 07:59:15 +00:00
parent 4034823d1b
commit e884d61a54
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/MultiLedger.c
View File

@ -574,19 +574,23 @@ xaccDestroyLedgerDisplay (Account *acc)
xaccLedgerDisplay *regData;
int n;
if (!acc) return;
/* find the single-account window for this account, if any */
FIND_IN_LIST (xaccLedgerDisplay, regList, acc, leader, regData);
if (regData) {
if (regData->destroy) { (regData->destroy) (regData); }
xaccLedgerDisplayClose (regData);
}
/* find the multiple-account window for this account, if any */
FIND_IN_LIST (xaccLedgerDisplay, ledgerList, acc, leader, regData);
if (regData) {
if (regData->destroy) { (regData->destroy) (regData); }
xaccLedgerDisplayClose (regData);
}
/* cruise throught the miscellanous account windows */
/* cruise throught the miscellaneous account windows */
if (!fullList) return;
n = 0;
regData = fullList[n];
@ -596,6 +600,8 @@ xaccDestroyLedgerDisplay (Account *acc)
got_one = ledgerIsMember (regData, acc);
if (got_one) {
if (regData->destroy) { (regData->destroy) (regData); }
xaccLedgerDisplayClose (regData);
n = -1; /* since the above alters this list */
}
n++;
regData = fullList[n];
@ -615,8 +621,11 @@ xaccDestroyLedgerDisplay (Account *acc)
void
xaccLedgerDisplayClose (xaccLedgerDisplay *regData)
{
Account *acc = regData->leader;
Account *acc;
if (!regData) return;
acc = regData->leader;
/* Save any unsaved changes */
xaccSRSaveRegEntry (regData->ledger);