From 653c34fa935efa4b55e234731563fbc28e2dbde2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andreas=20K=C3=B6hler?= Date: Sat, 21 Oct 2006 13:26:31 +0000 Subject: [PATCH] Correct xaccTransactionSetDescription to xaccTransSetDescription in a few scheme files. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@15051 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/engine/engine-interface.scm | 2 +- src/import-export/qif-import/qif-to-gnc.scm | 4 ++-- src/import-export/qif-io-core/qif-bank-xtn-import.scm | 2 +- src/import-export/qif-io-core/qif-invst-xtn-import.scm | 2 +- 4 files changed, 5 insertions(+), 5 deletions(-) diff --git a/src/engine/engine-interface.scm b/src/engine/engine-interface.scm index 7654f9ecf4..2b05b606c0 100644 --- a/src/engine/engine-interface.scm +++ b/src/engine/engine-interface.scm @@ -256,7 +256,7 @@ (notes (gnc:transaction-scm-get-notes trans-scm)) (date-posted (gnc:transaction-scm-get-date-posted trans-scm))) (if currency (xaccTransSetCurrency trans currency)) - (if description (xaccTransactionSetDescription trans description)) + (if description (xaccTransSetDescription trans description)) (if num (xaccTransSetNum trans num)) (if notes (xaccTransSetNotes trans notes)) (if date-posted (gnc-transaction-set-date diff --git a/src/import-export/qif-import/qif-to-gnc.scm b/src/import-export/qif-import/qif-to-gnc.scm index 37843d10c2..213a5e093e 100644 --- a/src/import-export/qif-import/qif-to-gnc.scm +++ b/src/import-export/qif-import/qif-to-gnc.scm @@ -390,7 +390,7 @@ ;; fixme: bug #105 (if qif-payee - (xaccTransactionSetDescription gnc-xtn qif-payee)) + (xaccTransSetDescription gnc-xtn qif-payee)) (if qif-number (xaccTransSetNum gnc-xtn qif-number)) (if qif-memo @@ -398,7 +398,7 @@ (xaccSplitSetMemo gnc-near-split qif-memo) (if (or (not qif-payee) (equal? qif-payee "")) - (xaccTransactionSetDescription gnc-xtn qif-memo)))) + (xaccTransSetDescription gnc-xtn qif-memo)))) (if (eq? qif-cleared 'cleared) (xaccSplitSetReconcile gnc-near-split #\c)) diff --git a/src/import-export/qif-io-core/qif-bank-xtn-import.scm b/src/import-export/qif-io-core/qif-bank-xtn-import.scm index b474b530b5..599d718469 100644 --- a/src/import-export/qif-io-core/qif-bank-xtn-import.scm +++ b/src/import-export/qif-io-core/qif-bank-xtn-import.scm @@ -87,7 +87,7 @@ (apply xaccTransSetDate gnc-xtn date)) (xaccTransSetNum gnc-xtn (qif-io:bank-xtn-number qif-xtn)) - (xaccTransactionSetDescription gnc-xtn (qif-io:bank-xtn-payee qif-xtn)) + (xaccTransSetDescription gnc-xtn (qif-io:bank-xtn-payee qif-xtn)) ;; create the near split (the one that goes to the source-acct) (let* ((near-acct-name (qif-io:bank-xtn-source-acct qif-xtn))) diff --git a/src/import-export/qif-io-core/qif-invst-xtn-import.scm b/src/import-export/qif-io-core/qif-invst-xtn-import.scm index 09439830ef..251b272a76 100644 --- a/src/import-export/qif-io-core/qif-invst-xtn-import.scm +++ b/src/import-export/qif-io-core/qif-invst-xtn-import.scm @@ -194,7 +194,7 @@ (apply xaccTransSetDate gnc-xtn date)) (xaccTransSetNum gnc-xtn (qif-io:invst-xtn-action qif-xtn)) - (xaccTransactionSetDescription gnc-xtn (qif-io:invst-xtn-payee qif-xtn)) + (xaccTransSetDescription gnc-xtn (qif-io:invst-xtn-payee qif-xtn)) ;; get the relevant info, including 'near-acct' and 'far-acct', ;; the accounts affected by the transaction