From bbe97eea70a5950339995cf216e7d13940519897 Mon Sep 17 00:00:00 2001 From: Derek Atkins Date: Tue, 2 Jul 2002 22:04:22 +0000 Subject: [PATCH] A few more typos git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7073 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/report/standard-reports/payables.scm | 2 +- src/report/standard-reports/receivables.scm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/report/standard-reports/payables.scm b/src/report/standard-reports/payables.scm index 969c2d53a3..0547953f99 100644 --- a/src/report/standard-reports/payables.scm +++ b/src/report/standard-reports/payables.scm @@ -55,7 +55,7 @@ (define (find-first-payable group num-accounts index) (if (>= index num-accounts) #f - (let* ((this-account (gnc:group-get-account (group index))) + (let* ((this-account (gnc:group-get-account group index)) (account-type (gw:enum--val->sym (gnc:account-get-type this-account) #f))) (if (eq? account-type 'payable) diff --git a/src/report/standard-reports/receivables.scm b/src/report/standard-reports/receivables.scm index eaecebf5a4..68ea432d44 100644 --- a/src/report/standard-reports/receivables.scm +++ b/src/report/standard-reports/receivables.scm @@ -58,7 +58,7 @@ (define (find-first-receivable group num-accounts index) (if (>= index num-accounts) #f - (let* ((this-account (gnc:group-get-account (group index))) + (let* ((this-account (gnc:group-get-account group index)) (account-type (gw:enum--val->sym (gnc:account-get-type this-account) #f))) (if (eq? account-type 'receivable)