From dda3645e701b709ead5162bf400e50a0a484deac Mon Sep 17 00:00:00 2001 From: Dave Peticolas Date: Mon, 15 Apr 2002 19:11:02 +0000 Subject: [PATCH] Andreas Bogk's qif import patch. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6793 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/import-export/qif-import/qif-to-gnc.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/import-export/qif-import/qif-to-gnc.scm b/src/import-export/qif-import/qif-to-gnc.scm index 79158db85d..e578d75d10 100644 --- a/src/import-export/qif-import/qif-to-gnc.scm +++ b/src/import-export/qif-import/qif-to-gnc.scm @@ -391,7 +391,11 @@ (if qif-number (gnc:transaction-set-xnum gnc-xtn qif-number)) (if qif-memo - (gnc:split-set-memo gnc-near-split qif-memo)) + (begin + (gnc:split-set-memo gnc-near-split qif-memo) + (if (or (not qif-payee) + (equal? qif-payee "")) + (gnc:transaction-set-description gnc-xtn qif-memo)))) (if (eq? qif-cleared 'cleared) (gnc:split-set-reconcile gnc-near-split #\c))