IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2024-11-26 02:40:43 -06:00
Code Issues Packages Projects Releases Wiki Activity

[register] remove unused functions

Browse Source
This commit is contained in:
Christopher Lam 2019-08-24 22:57:02 +08:00
parent 6b0bfa075c
commit 0d35e7c63d
1 changed files with 0 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gnucash/report/standard-reports/register.scm
View File

@ -163,17 +163,6 @@
(addto! heading-list (_ "Balance")))
(reverse heading-list)))
(define (gnc:split-get-balance-display split-info? split)
(let* ((account (xaccSplitGetAccount split))
(balance
(if split-info?
(xaccSplitGetBalance split)
(xaccTransGetAccountBalance
(xaccSplitGetParent split) account))))
(if (and (not (null? account)) (gnc-reverse-balance account))
(- balance)
balance)))
(define (add-split-row table split column-vector row-style transaction-info?
split-info? action-for-num? ledger-type? double? memo?
description? total-collector)
@ -360,10 +349,6 @@
(reverse row-contents))))))
split-value))
(define (lookup-sort-key sort-option)
(vector-ref (cdr (assq sort-option comp-funcs-assoc-list)) 0))
(define (lookup-subtotal-pred sort-option)
(vector-ref (cdr (assq sort-option comp-funcs-assoc-list)) 1))
(define (options-generator)