Fix bugs.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@3471 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas
2001-01-15 08:17:29 +00:00
parent 21bcf0ff5a
commit 86ba4dc0b3
2 changed files with 6 additions and 2 deletions

View File

@@ -990,6 +990,7 @@ LedgerMoveCursor (Table *table, VirtualLocation *p_new_virt_loc)
else if (old_trans &&
(old_trans != new_trans) &&
!trans_has_reconciled_splits (old_trans) &&
!info->first_pass &&
sr_balance_trans (reg, old_trans))
{
/* no matter what, stay there so the user can see what happened */
@@ -1358,6 +1359,9 @@ LedgerTraverse (Table *table,
guint32 changed;
Split *split;
if (info->first_pass)
return FALSE;
info->exact_traversal = (dir == GNC_TABLE_TRAVERSE_POINTER);
split = xaccSRGetCurrentSplit (reg);

View File

@@ -744,7 +744,7 @@ gnc_xfer_dialog_ok_cb(GtkWidget * widget, gpointer data)
xaccAccountBeginEdit(from);
xaccAccountInsertSplit(from, from_split);
xaccSplitSetShareAmount(from_split, gnc_numeric_neg (amount));
xaccSplitSetBaseValue(from_split, gnc_numeric_neg (amount), from_currency);
xaccSplitSetBaseValue(curr_split, amount, from_currency);
xaccSplitSetBaseValue(curr_split, to_amount, to_currency);
@@ -784,7 +784,7 @@ gnc_xfer_dialog_ok_cb(GtkWidget * widget, gpointer data)
xaccAccountBeginEdit(curr);
xaccAccountInsertSplit(curr, curr_split);
xaccSplitSetShareAmount(to_split, to_amount);
xaccSplitSetBaseValue(to_split, to_amount, to_currency);
xaccSplitSetBaseValue(curr_split, gnc_numeric_neg(amount), from_currency);
xaccSplitSetBaseValue(curr_split, gnc_numeric_neg(to_amount), to_currency);