mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
[budget][cash-flow] use srfi-1 functions
... instead of account utility functions which are now deprecated.
This commit is contained in:
parent
47cdcaded3
commit
e8637c7443
@ -817,7 +817,7 @@
|
||||
(let ((sub-accounts (gnc:acccounts-get-all-subaccounts accounts)))
|
||||
(for-each
|
||||
(lambda (sub-account)
|
||||
(if (not (account-in-list? sub-account accounts))
|
||||
(if (not (member sub-account accounts))
|
||||
(set! accounts (cons sub-account accounts))))
|
||||
sub-accounts)))
|
||||
|
||||
|
@ -172,7 +172,7 @@
|
||||
(let ((sub-accounts (gnc:acccounts-get-all-subaccounts accounts)))
|
||||
(for-each
|
||||
(lambda (sub-account)
|
||||
(if (not (account-in-list? sub-account accounts))
|
||||
(if (not (member sub-account accounts))
|
||||
(set! accounts (cons sub-account accounts))))
|
||||
sub-accounts)))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user