mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
A few more typos
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7073 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
@@ -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-<gnc:AccountType>-val->sym
|
||||
(gnc:account-get-type this-account) #f)))
|
||||
(if (eq? account-type 'payable)
|
||||
|
||||
@@ -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-<gnc:AccountType>-val->sym
|
||||
(gnc:account-get-type this-account) #f)))
|
||||
(if (eq? account-type 'receivable)
|
||||
|
||||
Reference in New Issue
Block a user