mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Merge Chris Lam's 'maint-fix-45f61a3'.
This commit is contained in:
commit
1999d85343
@ -543,7 +543,7 @@
|
|||||||
(gnc:make-numeric-collector)))))
|
(gnc:make-numeric-collector)))))
|
||||||
((caadr pair) 'add value-amount)
|
((caadr pair) 'add value-amount)
|
||||||
((cdadr pair) 'add share-amount)
|
((cdadr pair) 'add share-amount)
|
||||||
(set comm-list (list outer-comm (list pair)))))
|
(list outer-comm (list pair))))
|
||||||
|
|
||||||
(define (create-foreign-list comm-list transaction-comm account-comm
|
(define (create-foreign-list comm-list transaction-comm account-comm
|
||||||
share-amount value-amount)
|
share-amount value-amount)
|
||||||
@ -616,7 +616,7 @@
|
|||||||
(begin
|
(begin
|
||||||
(set! comm-list (create-commodity-list
|
(set! comm-list (create-commodity-list
|
||||||
account-comm transaction-comm
|
account-comm transaction-comm
|
||||||
share-amount value-amount))
|
value-amount share-amount))
|
||||||
(set! sumlist (cons comm-list sumlist)))
|
(set! sumlist (cons comm-list sumlist)))
|
||||||
|
|
||||||
;;yes, check for second commodity
|
;;yes, check for second commodity
|
||||||
|
Loading…
Reference in New Issue
Block a user