[business-core] deprecate gnc:entry-type-percent-p

This function is only used once. deprecate it.
This commit is contained in:
Christopher Lam
2019-07-19 02:15:13 +08:00
parent e654bd34af
commit 0c433e02f7
2 changed files with 3 additions and 1 deletions

View File

@@ -94,6 +94,8 @@
(else ""))))
(define (gnc:entry-type-percent-p type-val)
(issue-deprecation-warning
"gnc:entry-type-percent-p is deprecated.")
(let ((type type-val))
(equal? type GNC-AMT-TYPE-PERCENT)))