*** empty log message ***

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@2071 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas
2000-03-10 09:00:26 +00:00
parent a22ab2d102
commit ef968c2927
2 changed files with 13 additions and 25 deletions

View File

@@ -1,3 +1,11 @@
2000-03-10 Dave Peticolas <peticola@cs.ucdavis.edu>
* src/MultiLedger.c (xaccLedgerDisplayRefresh): don't reverse the
balances ever -- let the GUI do it.
* src/motif/RegWindow.c (regRefresh): reverse the balances
for INCOME and expense.
2000-03-09 Dave Peticolas <peticola@cs.ucdavis.edu> 2000-03-09 Dave Peticolas <peticola@cs.ucdavis.edu>
* src/gnome/window-register.c (regRefresh): print * src/gnome/window-register.c (regRefresh): print

View File

@@ -406,8 +406,6 @@ xaccLedgerDisplayGeneral (Account *lead_acc, Account **acclist, int ledger_type)
void void
xaccLedgerDisplayRefresh (xaccLedgerDisplay *regData) xaccLedgerDisplayRefresh (xaccLedgerDisplay *regData)
{ {
int typo;
/* If we don't really need the redraw, don't do it. */ /* If we don't really need the redraw, don't do it. */
if (!(regData->dirty)) return; if (!(regData->dirty)) return;
regData->dirty = 0; /* mark clean */ regData->dirty = 0; /* mark clean */
@@ -416,41 +414,23 @@ xaccLedgerDisplayRefresh (xaccLedgerDisplay *regData)
* assign a default source account for a "blank split" * assign a default source account for a "blank split"
* that is attached to the bottom of the register. * that is attached to the bottom of the register.
* The "blank split" is what the user edits to create * The "blank split" is what the user edits to create
* new splits and get them into the system. * new splits and get them into the system. */
*/
xaccSRLoadRegister (regData->ledger, xaccSRLoadRegister (regData->ledger,
xaccQueryGetSplits (regData->query), xaccQueryGetSplits (regData->query),
regData->leader); regData->leader);
/* hack alert -- this computation of totals is incorrect /* hack alert -- this computation of totals is incorrect
* for multi-account ledgers */ * for multi-account ledgers */
/* provide some convenience data for the ture GUI window. /* provide some convenience data for the the GUI window.
* If the GUI wants to display yet other stuff, its on its own. * If the GUI wants to display yet other stuff, it's on its own. */
*/
/* xaccAccountRecomputeBalance(regData->leader); */
regData->balance = xaccAccountGetBalance (regData->leader); regData->balance = xaccAccountGetBalance (regData->leader);
regData->clearedBalance = xaccAccountGetClearedBalance (regData->leader); regData->clearedBalance = xaccAccountGetClearedBalance (regData->leader);
regData->reconciledBalance = xaccAccountGetReconciledBalance (regData->leader); regData->reconciledBalance = xaccAccountGetReconciledBalance (regData->leader);
/* for income and expense acounts, we have to reverse
* the meaning of balance, since, in a dual entry
* system, income will show up as a credit to a
* bank account, and a debit to the income account.
* Thus, positive and negative are interchanged */
typo = regData->type & REG_TYPE_MASK;
if ((INCOME_REGISTER == typo) ||
(EXPENSE_REGISTER == typo)) {
regData->balance = - (regData->balance);
regData->clearedBalance = - (regData->clearedBalance);
regData->reconciledBalance = - (regData->reconciledBalance);
}
/* OK, now tell this specific GUI window to redraw itself ... */ /* OK, now tell this specific GUI window to redraw itself ... */
if (regData->redraw) { if (regData->redraw)
(regData->redraw) (regData); (regData->redraw) (regData);
}
} }
/********************************************************************\ /********************************************************************\