mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Addendum replace numeric to number in scheme
Addendum to e0300d3
- was crashing reports
This commit is contained in:
parent
849b236f7b
commit
48a6938e1c
@ -531,8 +531,8 @@
|
||||
|
||||
(define (create-commodity-list inner-comm outer-comm value-amount share-amount)
|
||||
(let ((pair (list inner-comm
|
||||
(cons (gnc:make-numeric-collector)
|
||||
(gnc:make-numeric-collector)))))
|
||||
(cons (gnc:make-number-collector)
|
||||
(gnc:make-number-collector)))))
|
||||
((caadr pair) 'add value-amount)
|
||||
((cdadr pair) 'add share-amount)
|
||||
(set comm-list (list outer-comm (list pair)))))
|
||||
|
Loading…
Reference in New Issue
Block a user