mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
*** empty log message ***
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@2090 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
8bc80497e1
commit
46691977ab
@ -30,11 +30,11 @@
|
||||
balance-temp))
|
||||
|
||||
(define (gnc:group-get-balance-until group to-tp)
|
||||
(sum (map (lambda (x) (gnc:account-get-balance-until x to-tp)) group)))
|
||||
(apply + (map (lambda (x) (gnc:account-get-balance-until x to-tp)) group)))
|
||||
|
||||
(define (gnc:group-get-balance-interval group from-tp to-tp)
|
||||
(sum (map (lambda (x)
|
||||
(gnc:account-get-balance-until x from-tp to-tp)) group)))
|
||||
(apply + (map (lambda (x)
|
||||
(gnc:account-get-balance-until x from-tp to-tp)) group)))
|
||||
|
||||
;; Just a private scope.
|
||||
(let
|
||||
|
Loading…
Reference in New Issue
Block a user