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

[c++options] Convert remaining reports and tests to new API.

Browse Source
This commit is contained in:
John Ralls
2022-12-23 10:01:52 -08:00
parent cec27308d8
commit 40c55899bc
42 changed files with 1257 additions and 1815 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
bindings/guile/options.scm
View File

@@ -82,7 +82,7 @@
(define-public (gnc:color-option->hex-string opt)
(format #f "~a" (GncOption-get-value opt)))
(define-public (gnc:option-get-value book category key)
(define-public (gnc:book-get-option-value book category key)
(define acc (if (pair? key) cons list))
(qof-book-get-option book (acc category key)))
@@ -408,11 +408,11 @@
(define (gnc:company-info book key)
;; Access company info from key-value pairs for current book
(gnc:option-get-value book gnc:*business-label* key))
(gnc:book-get-option-value book gnc:*business-label* key))
(define (gnc:fancy-date-info book key)
;; Access fancy date info from key-value pairs for current book
(gnc:option-get-value book gnc:*business-label* (list gnc:*fancy-date-label* key)))
(gnc:book-get-option-value book gnc:*business-label* (list gnc:*fancy-date-label* key)))