Bug #669964: Fix txn creation that forgot to set a txn currency.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@23058 57a11ea4-9604-0410-9ed3-97b8803252fd
Gnucash · Jun 19, 2013 · d8a0015 · d8a0015
1 parent 9b093ab
commit d8a0015
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/import-export/log-replay/gnc-log-replay.c b/src/import-export/log-replay/gnc-log-replay.c
@@ -479,6 +479,10 @@ static void  process_trans_record(  FILE *log_file)
                         {
                             acct = xaccAccountLookupDirect(record.acc_guid, book);
                             xaccAccountInsertSplit(acct, split);
+
+                            // No currency in the txn yet? Set one now.
+                            if (!xaccTransGetCurrency(trans))
+                                xaccTransSetCurrency(trans, gnc_account_or_default_currency(acct, NULL));
                         }
                         if (is_new_split)
                             xaccTransAppendSplit(trans, split);