TP->T64: libgnucash/engine/engine-interface.scm

This commit is contained in:
Christopher Lam
2017-12-24 13:16:41 +08:00
parent 6d89cc70be
commit fefea400ce

View File

@@ -101,7 +101,7 @@
(xaccSplitGetMemo split)
(xaccSplitGetAction split)
(xaccSplitGetReconcile split)
(gnc-split-get-date-reconciled split)
(xaccSplitGetDateReconciled split)
(xaccSplitGetAmount split)
(xaccSplitGetValue split)))
@@ -226,9 +226,9 @@
(gnc:make-transaction-scm
(gncTransGetGUID trans)
(xaccTransGetCurrency trans)
(gnc-transaction-get-date-entered trans)
(xaccTransGetDateEntered trans)
(if use-cut-semantics?
(gnc-transaction-get-date-posted trans)
(xaccTransGetDate trans)
#f)
(if use-cut-semantics?
(xaccTransGetNum trans)
@@ -259,8 +259,7 @@
(if description (xaccTransSetDescription trans description))
(if num (xaccTransSetNum trans num))
(if notes (xaccTransSetNotes trans notes))
(if date-posted (gnc-transaction-set-date
trans date-posted)))
(if date-posted (xaccTransSetDatePostedSecs trans date-posted)))
;; strip off the old splits
(for-each (lambda (split)