IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

2/3 [taxtxf] inline single-use scheme function from engine.scm

Browse Source
This commit is contained in:
Christopher Lam
2020-10-30 19:53:49 +08:00
parent a10c084022
commit 6637d6d210
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gnucash/report/reports/locale-specific/de_DE/taxtxf.scm
View File

@@ -471,9 +471,8 @@
(txf-special-split? (gnc:account-get-txf-code account)))
(+ gen 1) ; Est Fed Tax has a extra generation
gen) ; no kids, return input
(apply max (gnc:account-map-children
(lambda (x) (num-generations x (+ 1 gen)))
account))))
(apply max (map (lambda (x) (num-generations x (1+ gen)))
(or (gnc-account-get-children-sorted account) '())))))
(gnc:report-starting reportname)
(let* ((from-value (gnc:date-option-absolute-time