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

[new-aging] replace split->lot->split->lot with split->lot

Browse Source 
remove unnecessary call to get earliest-split
This commit is contained in:
Christopher Lam
2020-01-18 22:26:58 +08:00
parent 073e47801d
commit e788480e34
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
gnucash/report/business-reports/new-aging.scm
View File

@@ -193,7 +193,7 @@ exist but have no suitable transactions."))
;; simpler version of gnc:owner-from-split. must be gncOwnerFree after ;; simpler version of gnc:owner-from-split. must be gncOwnerFree after
;; use! see split-has-owner? above... ;; use! see split-has-owner? above...
(define (split->owner split) (define (split->owner split)
(let* ((lot (xaccSplitGetLot (gnc-lot-get-earliest-split (xaccSplitGetLot split)))) (let* ((lot (xaccSplitGetLot split))
(owner (gncOwnerNew)) (owner (gncOwnerNew))
(use-lot-owner? (gncOwnerGetOwnerFromLot lot owner))) (use-lot-owner? (gncOwnerGetOwnerFromLot lot owner)))
(unless use-lot-owner? (unless use-lot-owner?