gnucash maint: [budget][cash-flow] use srfi-1 functions
Christopher Lam
clam at code.gnucash.org
Sun Mar 3 11:07:36 EST 2019
Updated via https://github.com/Gnucash/gnucash/commit/e8637c74 (commit)
from https://github.com/Gnucash/gnucash/commit/47cdcade (commit)
commit e8637c7443bec7b7120cb186c1dcd7af5d4ee035
Author: Christopher Lam <christopher.lck at gmail.com>
Date: Sat Mar 2 21:25:11 2019 +0800
[budget][cash-flow] use srfi-1 functions
... instead of account utility functions which are now deprecated.
diff --git a/gnucash/report/standard-reports/budget.scm b/gnucash/report/standard-reports/budget.scm
index a31801a5a..b3513d149 100644
--- a/gnucash/report/standard-reports/budget.scm
+++ b/gnucash/report/standard-reports/budget.scm
@@ -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)))
diff --git a/gnucash/report/standard-reports/cash-flow.scm b/gnucash/report/standard-reports/cash-flow.scm
index b8ed255d6..ecb31a3f8 100644
--- a/gnucash/report/standard-reports/cash-flow.scm
+++ b/gnucash/report/standard-reports/cash-flow.scm
@@ -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)))
Summary of changes:
gnucash/report/standard-reports/budget.scm | 2 +-
gnucash/report/standard-reports/cash-flow.scm | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
More information about the gnucash-changes
mailing list