diff --git a/gnucash/report/standard-reports/budget.scm b/gnucash/report/standard-reports/budget.scm
index a31801a5a2..b3513d149a 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 b8ed255d69..ecb31a3f89 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)))