mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Fix a qif import error if commission account cannot be found in the mappings, #378274.
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@16095 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
fa0cc34ec2
commit
3000cdacb5
@ -615,13 +615,15 @@
|
||||
(xaccSplitSetReconcile gnc-far-split #\y)))
|
||||
|
||||
(if qif-commission-acct
|
||||
(let* ((commission-acct-info
|
||||
(let* ((commission-acct-info
|
||||
(or (hash-ref qif-acct-map qif-commission-acct)
|
||||
(hash-ref qif-cat-map qif-commission-acct)))
|
||||
(commission-acct-name
|
||||
(qif-map-entry:gnc-name commission-acct-info)))
|
||||
(set! commission-acct
|
||||
(hash-ref gnc-acct-hash commission-acct-name))))
|
||||
(commission-acct-name
|
||||
(and commission-acct-info
|
||||
(qif-map-entry:gnc-name commission-acct-info))))
|
||||
(if commission-acct-name
|
||||
(set! commission-acct
|
||||
(hash-ref gnc-acct-hash commission-acct-name)))))
|
||||
|
||||
(if (and commission-amt commission-acct)
|
||||
(begin
|
||||
|
Loading…
Reference in New Issue
Block a user