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

[business-options] deprecate unused option-types

Browse Source
This commit is contained in:
Christopher Lam 2019-07-12 20:36:57 +08:00
parent c9d001d550
commit 560b313f85
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
libgnucash/app-utils/business-options.scm
View File

@ -104,6 +104,8 @@
(if (string? item) (if (string? item)
(gncCustomerLookupFlip item (gnc-get-current-book)) (gncCustomerLookupFlip item (gnc-get-current-book))
item)) item))
(issue-deprecation-warning
"gnc:make-customer-option is unused.")
(let* ((option (convert-to-guid (default-getter))) (let* ((option (convert-to-guid (default-getter)))
(option-set #f) (option-set #f)
@ -166,6 +168,9 @@
(gncVendorLookupFlip item (gnc-get-current-book)) (gncVendorLookupFlip item (gnc-get-current-book))
item)) item))
(issue-deprecation-warning
"gnc:make-vendor-option is unused.")
(let* ((option (convert-to-guid (default-getter))) (let* ((option (convert-to-guid (default-getter)))
(option-set #f) (option-set #f)
(getter (lambda () (convert-to-vendor (getter (lambda () (convert-to-vendor
@ -226,6 +231,8 @@
(if (string? item) (if (string? item)
(gncEmployeeLookupFlip item (gnc-get-current-book)) (gncEmployeeLookupFlip item (gnc-get-current-book))
item)) item))
(issue-deprecation-warning
"gnc:make-employee-option is unused.")
(let* ((option (convert-to-guid (default-getter))) (let* ((option (convert-to-guid (default-getter)))
(option-set #f) (option-set #f)